7.1.2 (d x)^m (a+b arcsinh(c x))^n.nb

(* Content-type: application/mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 7.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       145,          7]
NotebookDataLength[    198546,       3897]
NotebookOptionsPosition[    193487,       3762]
NotebookOutlinePosition[    195179,       3815]
CellTagsIndexPosition[    195136,       3812]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[Cell[TextData[{
  StyleBox["Rules for integrands of the form  ",
   FontFamily->"Arial"],
  Cell[BoxData[
   RowBox[{
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"d", " ", "x"}], ")"}], "m"], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"a", "+", 
       RowBox[{"b", " ", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"]}]],
   CellDingbat->None,
   CellChangeTimes->{
    3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
     3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9, 
     3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9, 
     3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9}, 
     3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9}, 
     3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9, 
     3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
     3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9, 
     3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
     3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9, 
     3.519247079685614*^9, {3.5193208582062006`*^9, 3.5193208612170057`*^9}, 
     3.5193325694253187`*^9, {3.5193415004828687`*^9, 
     3.5193415113404875`*^9}, {3.5193513965602303`*^9, 
     3.519351397420232*^9}, {3.5194037839416766`*^9, 3.5194037847117205`*^9}, 
     3.52105258275843*^9, 3.5210531741726685`*^9, {3.521057461672199*^9, 
     3.5210574760242243`*^9}, {3.521059881564049*^9, 3.521059886088057*^9}, {
     3.5213902158895197`*^9, 3.521390217543123*^9}, {3.521390827878595*^9, 
     3.521390829376197*^9}, {3.5214688792561245`*^9, 3.521468879443325*^9}, {
     3.523320201951167*^9, 3.523320202247567*^9}, {3.5288596764894824`*^9, 
     3.5288596768094826`*^9}, {3.529196266260353*^9, 
     3.5291962665099535`*^9}, {3.5291997050223927`*^9, 
     3.5291997052563934`*^9}, {3.529201346457276*^9, 3.529201347252877*^9}, {
     3.529285041073242*^9, 3.5292850412632427`*^9}, {3.529285215443486*^9, 
     3.529285215443486*^9}, {3.5295115356999426`*^9, 
     3.5295115433443794`*^9}, {3.529521412127842*^9, 3.529521414647986*^9}, {
     3.529529429975619*^9, 3.529529432955224*^9}, 3.5340074894011116`*^9, 
     3.5415537711400824`*^9, {3.5415538454742126`*^9, 3.54155384951462*^9}, {
     3.5417297197063265`*^9, 3.5417297252443366`*^9}, {3.546297494083555*^9, 
     3.5462974982435613`*^9}, {3.5462989134855423`*^9, 
     3.5462989153655453`*^9}, 3.548544146508506*^9, 3.5488738855784535`*^9, {
     3.5505953688729563`*^9, 3.5505953726861744`*^9}, {3.550619508681926*^9, 
     3.5506195174954305`*^9}, {3.551326301250945*^9, 3.551326301841979*^9}, {
     3.552150760656293*^9, 3.552150761436294*^9}, 3.5521509768882723`*^9, {
     3.5521510341403728`*^9, 3.5521510486171985`*^9}, {3.5521511118909097`*^9,
      3.5521511159313164`*^9}, 3.55215165895267*^9, 3.552151705315952*^9, 
     3.553532182175474*^9, {3.553559669357978*^9, 3.553559705888029*^9}, {
     3.553560225618757*^9, 3.55356022752876*^9}, {3.5536175751912155`*^9, 
     3.5536175847212286`*^9}, 3.5860254133948617`*^9, 3.5861106634510365`*^9},
   FontWeight->"Bold"]
 }], "None"]], "Subsubtitle",
 CellDingbat->None,
 CellChangeTimes->{
  3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
   3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9, 
   3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9, 
   3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9}, 
   3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9}, 
   3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9, 
   3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
   3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9, 
   3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
   3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9, 
   3.4965234353062396`*^9, {3.5193214825316973`*^9, 3.5193214852617016`*^9}, {
   3.523316399894187*^9, 3.5233164032341914`*^9}, {3.523318350558202*^9, 
   3.5233183516382036`*^9}, {3.536542725780803*^9, 3.536542725780803*^9}, {
   3.5367764878952584`*^9, 3.5367764886452594`*^9}, {3.544322815209103*^9, 
   3.5443228192963104`*^9}, {3.5450662624913826`*^9, 3.545066292141424*^9}, {
   3.545066402271579*^9, 3.5450664054415827`*^9}, {3.5450834884295015`*^9, 
   3.5450834895895033`*^9}, {3.5454961263762493`*^9, 
   3.5454961321462574`*^9}, {3.5454963863166127`*^9, 
   3.5454964580867133`*^9}, {3.545497046127537*^9, 3.545497046127537*^9}, {
   3.5454971130676303`*^9, 3.545497136257663*^9}, 3.545610399977621*^9, {
   3.546040778592962*^9, 3.546040778592962*^9}, {3.5461052065706367`*^9, 
   3.5461052249474688`*^9}, {3.546191339879622*^9, 3.5461913430596266`*^9}, {
   3.5462141824067917`*^9, 3.5462142145768366`*^9}, {3.5462145455473003`*^9, 
   3.5462145601073203`*^9}, {3.5463149785974817`*^9, 
   3.5463149794195285`*^9}, {3.5488738437683954`*^9, 
   3.5488738699084315`*^9}, {3.5488890647645535`*^9, 3.548889080804576*^9}, {
   3.5505951583099127`*^9, 3.5505951620351257`*^9}, {3.5758457803910656`*^9, 
   3.5758457938510847`*^9}, {3.5758458780912023`*^9, 
   3.5758458797312045`*^9}, {3.5758460250714083`*^9, 3.575846028691413*^9}, {
   3.5758461031815176`*^9, 3.575846103681518*^9}, {3.5758463018517957`*^9, 
   3.5758463042917986`*^9}, {3.5758464155019546`*^9, 3.575846417191957*^9}, {
   3.5758465224621043`*^9, 3.5758465297321143`*^9}, {3.586110883301344*^9, 
   3.5861109115613837`*^9}, {3.586189963835286*^9, 3.586189963835286*^9}, {
   3.5861901083579884`*^9, 3.5861901105479918`*^9}, {3.6712121396555467`*^9, 
   3.6712121396555467`*^9}, {3.671212576753547*^9, 3.671212576753547*^9}, {
   3.6713792768628645`*^9, 3.6713792768628645`*^9}},
 TextAlignment->Center,
 FontWeight->"Bold"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{Cell[TextData[StyleBox["1.",
   FontFamily->"Arial"]], "None"], "  ", 
  RowBox[{"\[Integral]", 
   RowBox[{
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"d", " ", "x"}], ")"}], "m"], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"a", "+", 
       RowBox[{"b", " ", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], 
    RowBox[{"\[DifferentialD]", "x"}], "  ", 
    StyleBox["when",
     FontFamily->"Arial",
     FontWeight->"Plain"], 
    StyleBox["  ",
     FontFamily->"Arial",
     FontWeight->"Plain"], Cell[TextData[Cell[BoxData[
     RowBox[{"n", "\[Element]", 
      SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}]]]], 
     "None"]}]}]}]], "Subsubtitle",
 CellDingbat->None,
 CellChangeTimes->{
  3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
   3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9, 
   3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9, 
   3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9}, 
   3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9}, 
   3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9, 
   3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
   3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9, 
   3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
   3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9, 
   3.519247079685614*^9, {3.5193208582062006`*^9, 3.5193208612170057`*^9}, 
   3.5193325694253187`*^9, {3.5193415004828687`*^9, 3.5193415113404875`*^9}, {
   3.5193513965602303`*^9, 3.519351397420232*^9}, {3.5194037839416766`*^9, 
   3.5194037847117205`*^9}, 3.52105258275843*^9, 3.5210531741726685`*^9, {
   3.521057461672199*^9, 3.5210574760242243`*^9}, {3.521059881564049*^9, 
   3.521059886088057*^9}, {3.5213902158895197`*^9, 3.521390217543123*^9}, {
   3.521390827878595*^9, 3.521390829376197*^9}, {3.5214688792561245`*^9, 
   3.521468879443325*^9}, {3.523320201951167*^9, 3.523320202247567*^9}, {
   3.5288596764894824`*^9, 3.5288596768094826`*^9}, {3.529196266260353*^9, 
   3.5291962665099535`*^9}, {3.5291997050223927`*^9, 
   3.5291997052563934`*^9}, {3.529201346457276*^9, 3.529201347252877*^9}, {
   3.529285041073242*^9, 3.5292850412632427`*^9}, {3.529285215443486*^9, 
   3.529285215443486*^9}, {3.5295115356999426`*^9, 3.5295115433443794`*^9}, {
   3.529521412127842*^9, 3.529521414647986*^9}, {3.529529429975619*^9, 
   3.529529432955224*^9}, 3.5340074894011116`*^9, 3.5415537711400824`*^9, {
   3.5415538454742126`*^9, 3.54155384951462*^9}, {3.5417297197063265`*^9, 
   3.5417297252443366`*^9}, {3.546297494083555*^9, 3.5462974982435613`*^9}, {
   3.5462989134855423`*^9, 3.5462989153655453`*^9}, 3.548544146508506*^9, 
   3.5488738855784535`*^9, {3.5505953688729563`*^9, 3.5505953726861744`*^9}, {
   3.550619508681926*^9, 3.5506195174954305`*^9}, {3.551326301250945*^9, 
   3.551326301841979*^9}, {3.552150760656293*^9, 3.552150761436294*^9}, 
   3.5521509768882723`*^9, {3.5521510341403728`*^9, 3.5521510486171985`*^9}, {
   3.5521511118909097`*^9, 3.5521511159313164`*^9}, 3.55215165895267*^9, 
   3.552151705315952*^9, 3.553532182175474*^9, {3.553559669357978*^9, 
   3.5535596696079783`*^9}, {3.5535605644192314`*^9, 
   3.5535605652692327`*^9}, {3.5535610430699015`*^9, 3.5535610432399015`*^9}, 
   3.5535614789405117`*^9, {3.5535616244807153`*^9, 3.5535616246407156`*^9}, {
   3.5548523491989403`*^9, 3.5548523662029705`*^9}, 3.5548704576963353`*^9, {
   3.5549147309224463`*^9, 3.5549147449824657`*^9}, 3.5853498571410403`*^9, 
   3.5861901474230433`*^9, 3.620157790295836*^9, {3.6204986608495607`*^9, 
   3.620498664612776*^9}, {3.6205012137785797`*^9, 3.620501228019394*^9}, 
   3.620501456712475*^9, {3.6712121254437337`*^9, 3.671212130818041*^9}, 
   3.6712121925915747`*^9, 3.6712139606247*^9, 3.671214028154563*^9, 
   3.671379261637238*^9},
 FontSize->12,
 FontWeight->"Bold"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\t", 
  RowBox[{Cell[TextData[StyleBox["1:",
    FontFamily->"Arial",
    FontColor->RGBColor[1, 0, 0]]], "None"], "  ", 
   RowBox[{"\[Integral]", 
    RowBox[{
     FractionBox[
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{"a", "+", 
         RowBox[{"b", " ", 
          RowBox[{"ArcSinh", "[", 
           RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], "x"], 
     RowBox[{"\[DifferentialD]", "x"}], "  ", 
     StyleBox["when",
      FontFamily->"Arial",
      FontWeight->"Plain"], 
     StyleBox["  ",
      FontFamily->"Arial",
      FontWeight->"Plain"], Cell[TextData[Cell[BoxData[
      RowBox[{"n", "\[Element]", 
       SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}]]]], 
      "None"]}]}]}]}]], "Subsubtitle",
 CellDingbat->None,
 CellChangeTimes->{
  3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
   3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9, 
   3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9, 
   3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9}, 
   3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9}, 
   3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9, 
   3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
   3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9, 
   3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
   3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9, 
   3.519247079685614*^9, {3.5193208582062006`*^9, 3.5193208612170057`*^9}, 
   3.5193325694253187`*^9, {3.5193422443984776`*^9, 3.5193422447260776`*^9}, 
   3.5193424488212357`*^9, {3.5193434708254333`*^9, 3.519343473103037*^9}, {
   3.5193435097631016`*^9, 3.51934353169674*^9}, {3.519345739319023*^9, 
   3.519345739599823*^9}, 3.5193462601259375`*^9, {3.5193475061060295`*^9, 
   3.5193475233908596`*^9}, {3.519351391880224*^9, 3.5193513931402254`*^9}, {
   3.519403773021052*^9, 3.5194037798564425`*^9}, 3.5194106793250647`*^9, {
   3.519537578341393*^9, 3.5195375792305946`*^9}, {3.5195376277778797`*^9, 
   3.51953767927357*^9}, {3.5197586260636144`*^9, 3.5197586260636144`*^9}, {
   3.51978053295651*^9, 3.519780542862528*^9}, {3.5197806526087203`*^9, 
   3.5197806657595434`*^9}, {3.5197807490168896`*^9, 3.5197807642581167`*^9}, 
   3.5197809004619555`*^9, {3.519782653514635*^9, 3.5197826623286505`*^9}, {
   3.5200207810164795`*^9, 3.520020785046485*^9}, {3.5213126833374643`*^9, 
   3.5213126833374643`*^9}, {3.521328235411002*^9, 3.521328235411002*^9}, {
   3.523315567893022*^9, 3.523315567893022*^9}, {3.5233157569332867`*^9, 
   3.5233157613032923`*^9}, {3.5323023198133526`*^9, 3.532302355723403*^9}, {
   3.5323026417638035`*^9, 3.5323026417638035`*^9}, {3.5323026980138817`*^9, 
   3.5323026980138817`*^9}, {3.532636287104328*^9, 3.532636287104328*^9}, {
   3.5330803686035347`*^9, 3.533080368863535*^9}, {3.533248909289961*^9, 
   3.5332489110299635`*^9}, {3.534962469565694*^9, 3.5349624910757236`*^9}, {
   3.5349625224057674`*^9, 3.534962522655768*^9}, {3.534965265519608*^9, 
   3.534965265519608*^9}, {3.5349668288168063`*^9, 3.5349668292668066`*^9}, {
   3.5349747358481646`*^9, 3.5349747358481646`*^9}, {3.534975457949176*^9, 
   3.534975457949176*^9}, {3.5368633963532934`*^9, 3.536863396571694*^9}, {
   3.541644322511304*^9, 3.5416443577513533`*^9}, {3.5416458269234104`*^9, 
   3.541645839633428*^9}, {3.5416460312236967`*^9, 3.541646031483697*^9}, 
   3.541646227783972*^9, {3.541647080335165*^9, 3.5416471077052035`*^9}, {
   3.541648997607849*^9, 3.5416489978278494`*^9}, 3.541649088407976*^9, {
   3.5417848711596775`*^9, 3.541784902429721*^9}, {3.541786145331461*^9, 
   3.5417861455914617`*^9}, {3.5417870037166634`*^9, 3.5417870039366636`*^9}, 
   3.5462979620242105`*^9, {3.546298264094633*^9, 3.546298265344635*^9}, {
   3.546299000235664*^9, 3.546299001505666*^9}, {3.546315119909564*^9, 
   3.5463151267659564`*^9}, {3.547227356319705*^9, 3.547227356319705*^9}, 
   3.547918559331044*^9, {3.547918610170952*^9, 3.5479186304411116`*^9}, 
   3.548537755517557*^9, 3.5485441629685287`*^9, 3.5485517520154133`*^9, {
   3.5488740727887154`*^9, 3.5488740727887154`*^9}, {3.548874206618903*^9, 
   3.548874206808903*^9}, 3.548877100795455*^9, 3.550596464087599*^9, {
   3.5505965767870445`*^9, 3.5505965767870445`*^9}, 3.5505966202465305`*^9, {
   3.5506039138305197`*^9, 3.55060391400453*^9}, {3.5506040039986773`*^9, 
   3.550604005776779*^9}, {3.5506178888272758`*^9, 3.5506178900273447`*^9}, {
   3.550770598144562*^9, 3.550770659629079*^9}, {3.5507707252908344`*^9, 
   3.5507707474461017`*^9}, 3.5507880023630266`*^9, {3.5508017696214375`*^9, 
   3.5508017788269644`*^9}, {3.5508018116158395`*^9, 3.5508018116158395`*^9}, 
   3.5508018976437597`*^9, {3.5508021384015307`*^9, 3.550802155115487*^9}, {
   3.5508022151019173`*^9, 3.5508022151019173`*^9}, {3.550802487106476*^9, 
   3.5508025179152374`*^9}, {3.5508029261175857`*^9, 
   3.5508029342300496`*^9}, {3.5521511708590136`*^9, 3.5521511712334137`*^9}, 
   3.552151666269083*^9, {3.5535324250863676`*^9, 3.553532441643315*^9}, {
   3.553532476791325*^9, 3.553532477502366*^9}, {3.5535325810722895`*^9, 
   3.5535325810722895`*^9}, {3.553534924419321*^9, 3.5535349316017323`*^9}, {
   3.5535606916294093`*^9, 3.553560715209442*^9}, {3.553560906999711*^9, 
   3.553560912889719*^9}, {3.5535610183798666`*^9, 3.5535610197098684`*^9}, {
   3.553561508580553*^9, 3.553561525080576*^9}, {3.5535615930406713`*^9, 
   3.5535616035406857`*^9}, {3.554910910997098*^9, 3.554910915757105*^9}, {
   3.5549117484282703`*^9, 3.5549117605482874`*^9}, {3.554912730909646*^9, 
   3.5549127360396533`*^9}, {3.5549136721909637`*^9, 3.5549136721909637`*^9}, 
   3.554914986132803*^9, {3.5549163241346765`*^9, 3.5549163243246765`*^9}, {
   3.5549164278148212`*^9, 3.554916428034822*^9}, {3.5549327039364157`*^9, 
   3.5549327054764185`*^9}, 3.5551920407462616`*^9, {3.555250957523697*^9, 
   3.5552509591772995`*^9}, {3.555252683307928*^9, 3.555252683510728*^9}, 
   3.5853498582910423`*^9, 3.5853508165523834`*^9, {3.5853518656263523`*^9, 
   3.5853518674363546`*^9}, 3.5861901481930447`*^9, 3.5863642524534893`*^9, {
   3.586968219253298*^9, 3.586968219253298*^9}, 3.586968958261863*^9, {
   3.5869708508560925`*^9, 3.5869708836661396`*^9}, 3.5869851842914906`*^9, {
   3.5869884306060896`*^9, 3.5869884306060896`*^9}, {3.586991203969972*^9, 
   3.586991204529973*^9}, {3.586991582290502*^9, 3.5869915824905024`*^9}, {
   3.5870773806800413`*^9, 3.587077381370043*^9}, 3.6201579387583275`*^9, 
   3.6202686266178327`*^9, {3.6205016405759907`*^9, 3.6205016861605988`*^9}, {
   3.6205017405887117`*^9, 3.6205017416227703`*^9}, 3.6205021343522334`*^9, 
   3.6209257654343805`*^9, 3.62092831155301*^9, {3.671212203751213*^9, 
   3.671212228079604*^9}, 3.671212593751519*^9, {3.67121292716759*^9, 
   3.671212944050555*^9}, 3.671379299951707*^9},
 FontSize->12,
 FontWeight->"Bold"],

Cell["Derivation: Integration by substitution", "Subsubsection",
 CellChangeTimes->{3.4941724567488375`*^9, 3.494172818179343*^9}],

Cell[TextData[{
 "Basis: ",
 Cell[BoxData[
  RowBox[{
   FractionBox["1", "x"], "\[Equal]", 
   RowBox[{
    FractionBox["1", "b"], " ", 
    RowBox[{"Subst", "[", 
     RowBox[{
      RowBox[{"Coth", "[", 
       RowBox[{
        RowBox[{"-", 
         FractionBox["a", "b"]}], "+", 
        FractionBox["x", "b"]}], "]"}], ",", "x", ",", 
      RowBox[{"a", "+", 
       RowBox[{"b", " ", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", " ", "x"}], "]"}]}]}]}], "]"}], " ", 
    RowBox[{
     SubscriptBox["\[PartialD]", "x"], 
     RowBox[{"(", 
      RowBox[{"a", "+", 
       RowBox[{"b", " ", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}]}]}]}]], "Input",
  CellChangeTimes->{{3.586566688639513*^9, 3.586566713339547*^9}, {
    3.586567111720105*^9, 3.5865671350101376`*^9}, {3.586567519960676*^9, 
    3.5865675376207013`*^9}, 3.586567570720748*^9, {3.58656788675119*^9, 
    3.58656790809122*^9}, {3.586567943031269*^9, 3.5865680220613794`*^9}, {
    3.586568118811515*^9, 3.586568119461516*^9}, {3.5865681534515634`*^9, 
    3.5865681775415974`*^9}, {3.5865682092116413`*^9, 
    3.5865682434616895`*^9}, {3.5865682763917356`*^9, 3.5865683413518267`*^9}}]
}], "Subsubsection",
 CellChangeTimes->{{3.5813762364323072`*^9, 3.581376326802434*^9}, {
   3.5813826880473433`*^9, 3.5813826880473433`*^9}, {3.581720310829357*^9, 
   3.581720310829357*^9}, {3.581720366149435*^9, 3.581720366149435*^9}, {
   3.5817204073994923`*^9, 3.5817204073994923`*^9}, {3.581720524929657*^9, 
   3.581720524929657*^9}, {3.5864633734979143`*^9, 3.5864633862354326`*^9}, {
   3.586463493968087*^9, 3.586463494893089*^9}, {3.5864635381531506`*^9, 
   3.5864635393731527`*^9}, {3.586463685870864*^9, 3.586463685870864*^9}, {
   3.58646382210106*^9, 3.58646382210106*^9}, {3.5864732982240467`*^9, 
   3.5864732982240467`*^9}, {3.586485090653509*^9, 3.586485090653509*^9}, {
   3.586485180371138*^9, 3.586485180371138*^9}, {3.5864852213711967`*^9, 
   3.5864852213711967`*^9}, {3.586494187606468*^9, 3.5864942133777137`*^9}, {
   3.5865432242749014`*^9, 3.5865432242749014`*^9}, {3.5865463088192196`*^9, 
   3.586546312729225*^9}, {3.586546396929343*^9, 3.5865464175093718`*^9}, {
   3.5865464529294214`*^9, 3.5865464529294214`*^9}, {3.586546532519533*^9, 
   3.586546532519533*^9}, {3.5865468163899307`*^9, 3.5865468386399612`*^9}, {
   3.5865491636532164`*^9, 3.5865491636532164`*^9}, {3.5865492145532875`*^9, 
   3.5865492145532875`*^9}, {3.586551856136986*^9, 3.586551856136986*^9}, {
   3.5865607519912014`*^9, 3.5865607519912014`*^9}, {3.586563741525387*^9, 
   3.5865638039054737`*^9}, {3.5865678077210793`*^9, 3.586567824111102*^9}, 
   3.586568533272095*^9, {3.5865688286425085`*^9, 3.5865688286425085`*^9}, {
   3.586568997022744*^9, 3.586568997022744*^9}, {3.5865691763429956`*^9, 
   3.5865691763429956`*^9}, {3.5865833764756064`*^9, 
   3.5865833764756064`*^9}, {3.620501915857736*^9, 3.620501915857736*^9}, {
   3.6712128305470634`*^9, 3.6712128305470634`*^9}, {3.6713792999829073`*^9, 
   3.6713792999829073`*^9}, {3.6713794435607643`*^9, 
   3.6713794435607643`*^9}, {3.751308971135766*^9, 3.751308971813805*^9}, {
   3.7513090956018853`*^9, 3.7513090956018853`*^9}, {3.752967085079039*^9, 
   3.752967085079039*^9}, {3.7529671905653067`*^9, 3.7529671905653067`*^9}, {
   3.7529726707744846`*^9, 3.7529726782936974`*^9}, {3.75297270837055*^9, 
   3.75297270837055*^9}, {3.7534571869190598`*^9, 3.7534571869190598`*^9}, {
   3.7534572202095175`*^9, 3.7534572202095175`*^9}}],

Cell[TextData[{
 "Note: If  ",
 Cell[BoxData[
  RowBox[{"n", "\[Element]", 
   SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}]]],
 ", then ",
 Cell[BoxData[
  RowBox[{
   SuperscriptBox["x", "n"], " ", 
   RowBox[{"Coth", "[", 
    RowBox[{
     RowBox[{"-", 
      FractionBox["a", "b"]}], "+", 
     FractionBox["x", "b"]}], "]"}]}]],
  CellDingbat->None,
  CellChangeTimes->{{3.4796579732027807`*^9, 3.479658002474872*^9}, {
    3.4796580599975853`*^9, 3.4796580609489536`*^9}, {3.479658295195784*^9, 
    3.47965829684816*^9}, 3.4796611938939075`*^9, 3.4796613924794593`*^9, {
    3.479661443342597*^9, 3.479661446647349*^9}, {3.479661576554146*^9, 
    3.479661589302477*^9}, 3.479661847553824*^9, {3.4796622294729967`*^9, 
    3.4796622450654173`*^9}, {3.479686720424531*^9, 3.4796867204345455`*^9}, {
    3.4796874646646957`*^9, 3.4796874745589232`*^9}, {3.492826573513727*^9, 
    3.492826578630536*^9}, {3.4928267070863624`*^9, 3.492826707460763*^9}, 
    3.4928267903497095`*^9, {3.492829799151373*^9, 3.4928299617216005`*^9}, {
    3.4940972077187414`*^9, 3.4940972347887793`*^9}, {3.49409966398218*^9, 
    3.494099664952181*^9}, {3.4940997156722527`*^9, 3.494099716112253*^9}, 
    3.4941724567488375`*^9, {3.4941727384192314`*^9, 3.494172760679263*^9}, {
    3.4941763955899596`*^9, 3.4941764290900064`*^9}, {3.4941764605500507`*^9, 
    3.4941764930400963`*^9}, 3.4941770641708956`*^9, 3.494177118590972*^9, {
    3.4941890257602143`*^9, 3.4941890417814426`*^9}, {3.494189320351132*^9, 
    3.4941893689764175`*^9}, {3.4941960634447823`*^9, 3.494196109948464*^9}, {
    3.494196492625537*^9, 3.4941965253075943`*^9}, {3.4941967717568274`*^9, 
    3.4941967891820583`*^9}, {3.494198824027233*^9, 3.4941988799065313`*^9}, {
    3.5549115691980195`*^9, 3.5549115968580585`*^9}, {3.554912582239438*^9, 
    3.5549126668695564`*^9}, {3.5549164354848323`*^9, 3.554916460314867*^9}, {
    3.554916561565009*^9, 3.5549165719750233`*^9}, {3.5853498583310423`*^9, 
    3.5853498583310423`*^9}, 3.585350816572384*^9, {3.5853519065864096`*^9, 
    3.5853519087964125`*^9}, {3.5861901482330446`*^9, 3.5861901482330446`*^9},
     3.586190724633852*^9, {3.586968096958122*^9, 3.586968185123249*^9}, {
    3.586985186366493*^9, 3.5869852059365215`*^9}, {3.5869869891440716`*^9, 
    3.5869869898240724`*^9}, 3.62050169580215*^9, {3.620501750392272*^9, 
    3.620501791017596*^9}, {3.6209256961144156`*^9, 3.6209257068080273`*^9}, {
    3.6712122203891644`*^9, 3.6712122373831367`*^9}, {3.6712122713250775`*^9, 
    3.671212281716672*^9}, {3.6712125984707894`*^9, 3.6712126104024715`*^9}, {
    3.6713792999985075`*^9, 3.6713792999985075`*^9}, 3.671379450190776*^9, {
    3.752972757136236*^9, 3.752972774779867*^9}},
  TextAlignment->Center,
  FontSize->12,
  FontWeight->"Bold"],
 " is integrable in closed-form."
}], "Subsubsection",
 CellDingbat->"\[FilledSmallSquare]",
 CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
   3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9, 
   3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9, 
   3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
   3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9, 
   3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9, 
   3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9}, 
   3.48070534977779*^9, {3.4928296953212276`*^9, 3.492829707041244*^9}, 
   3.4941724084687696`*^9, 3.4941724567488375`*^9, {3.4941737492506466`*^9, 
   3.4941737506706486`*^9}, {3.494173966810951*^9, 3.494174007671008*^9}, {
   3.4941741326011834`*^9, 3.4941741425911975`*^9}, {3.4941767936905165`*^9, 
   3.494176809630539*^9}, {3.4941773316412697`*^9, 3.494177333751273*^9}, {
   3.4941781299723873`*^9, 3.494178211092501*^9}, {3.494178252592559*^9, 
   3.4941782798925977`*^9}, {3.49417832450266*^9, 3.494178365332717*^9}, {
   3.4941785870814295`*^9, 3.4941785879394307`*^9}, {3.4941796318276644`*^9, 
   3.4941796418116817`*^9}, 3.574190021318244*^9, {3.574190199236556*^9, 
   3.574190206599769*^9}, {3.586718323140966*^9, 3.586718344360996*^9}, {
   3.5867184410511312`*^9, 3.586718469371171*^9}, {3.586718741191551*^9, 
   3.586718773781597*^9}, {3.58697075179595*^9, 3.5869707777309875`*^9}, {
   3.5869853577967405`*^9, 3.5869853577967405`*^9}, {3.5869870050640936`*^9, 
   3.586987005464094*^9}, {3.58698840977606*^9, 3.586988418726073*^9}, {
   3.5870773847900476`*^9, 3.5870773857850494`*^9}, {3.671215132559731*^9, 
   3.671215132773743*^9}, {3.671215220328751*^9, 3.671215220328751*^9}, {
   3.6712155133935137`*^9, 3.671215543881257*^9}, {3.671215959036003*^9, 
   3.671215959036003*^9}, {3.6713809831417217`*^9, 3.6713809831417217`*^9}, {
   3.7513112625758295`*^9, 3.751311278030713*^9}, {3.75288045587368*^9, 
   3.75288045587368*^9}, {3.7528808157507124`*^9, 3.752880830274338*^9}, {
   3.752880999456635*^9, 3.752880999456635*^9}, {3.7528814326069956`*^9, 
   3.7528814326069956`*^9}, {3.752881590338873*^9, 3.752881590338873*^9}, {
   3.7529672894226804`*^9, 3.7529673002646995`*^9}, {3.7529727328313932`*^9, 
   3.752972741661009*^9}, {3.7529727833910823`*^9, 3.7529727898026934`*^9}, {
   3.7534571886194625`*^9, 3.7534571886194625`*^9}}],

Cell[TextData[{
 "Rule: If  ",
 Cell[BoxData[
  RowBox[{"n", "\[Element]", 
   SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}]]],
 ", then"
}], "Subsubsection",
 CellDingbat->"\[FilledSmallSquare]",
 CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
   3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9, 
   3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9, 
   3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
   3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9, 
   3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9, 
   3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9}, 
   3.48070534977779*^9, {3.4928296953212276`*^9, 3.492829707041244*^9}, 
   3.4941724084687696`*^9, 3.4941724567488375`*^9, {3.4941737492506466`*^9, 
   3.4941737506706486`*^9}, {3.494173966810951*^9, 3.494174007671008*^9}, {
   3.4941741326011834`*^9, 3.4941741425911975`*^9}, {3.4941767936905165`*^9, 
   3.494176809630539*^9}, {3.4941773316412697`*^9, 3.494177333751273*^9}, {
   3.4941891756608777`*^9, 3.494189178765283*^9}, {3.4942004775317707`*^9, 
   3.494200477881771*^9}, {3.4950424099901724`*^9, 3.495042435550208*^9}, {
   3.495045573264601*^9, 3.4950455868746204`*^9}, {3.5533778848417416`*^9, 
   3.55337789792449*^9}, {3.5535355634443245`*^9, 3.5535355634443245`*^9}, {
   3.5549309146039114`*^9, 3.5549309146039114`*^9}, {3.554935398190188*^9, 
   3.554935398190188*^9}, {3.554935438010244*^9, 3.554935438010244*^9}, {
   3.555033842213949*^9, 3.555033842213949*^9}, {3.55519561866591*^9, 
   3.55519561866591*^9}, {3.5551973155382853`*^9, 3.5551973155382853`*^9}, {
   3.5552507987466173`*^9, 3.5552507987466173`*^9}, {3.555251708290615*^9, 
   3.555251708290615*^9}, {3.5863609285464163`*^9, 3.5863609299914184`*^9}, {
   3.5869832316511793`*^9, 3.5869832316511793`*^9}, {3.620501260083228*^9, 
   3.620501260083228*^9}, {3.6712129792485685`*^9, 3.6712129792485685`*^9}}],

Cell[BoxData[
 RowBox[{"\[Integral]", 
  RowBox[{
   FractionBox[
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"a", "+", 
       RowBox[{"b", " ", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], "x"], 
   RowBox[{"\[DifferentialD]", 
    RowBox[{"x", "  ", "\[LongRightArrow]", "  ", 
     FractionBox["1", "b"]}]}], " ", 
   RowBox[{"Subst", "[", 
    RowBox[{
     RowBox[{"\[Integral]", 
      RowBox[{
       SuperscriptBox["x", "n"], " ", 
       RowBox[{"Coth", "[", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["a", "b"]}], "+", 
         FractionBox["x", "b"]}], "]"}], 
       RowBox[{"\[DifferentialD]", "x"}]}]}], ",", "x", ",", 
     RowBox[{"a", "+", 
      RowBox[{"b", " ", 
       RowBox[{"ArcSinh", "[", 
        RowBox[{"c", " ", "x"}], "]"}]}]}]}], "]"}]}]}]], "Subsubtitle",
 CellDingbat->None,
 CellChangeTimes->{{3.4796579732027807`*^9, 3.479658002474872*^9}, {
   3.4796580599975853`*^9, 3.4796580609489536`*^9}, {3.479658295195784*^9, 
   3.47965829684816*^9}, 3.4796611938939075`*^9, 3.4796613924794593`*^9, {
   3.479661443342597*^9, 3.479661446647349*^9}, {3.479661576554146*^9, 
   3.479661589302477*^9}, 3.479661847553824*^9, {3.4796622294729967`*^9, 
   3.4796622450654173`*^9}, {3.479686720424531*^9, 3.4796867204345455`*^9}, {
   3.4796874646646957`*^9, 3.4796874745589232`*^9}, {3.492826573513727*^9, 
   3.492826578630536*^9}, {3.4928267070863624`*^9, 3.492826707460763*^9}, 
   3.4928267903497095`*^9, {3.492829799151373*^9, 3.4928299617216005`*^9}, {
   3.4940972077187414`*^9, 3.4940972347887793`*^9}, {3.49409966398218*^9, 
   3.494099664952181*^9}, {3.4940997156722527`*^9, 3.494099716112253*^9}, 
   3.4941724567488375`*^9, {3.4941727384192314`*^9, 3.494172760679263*^9}, {
   3.4941763955899596`*^9, 3.4941764290900064`*^9}, {3.4941764605500507`*^9, 
   3.4941764930400963`*^9}, 3.4941770641708956`*^9, 3.494177118590972*^9, {
   3.4941890257602143`*^9, 3.4941890417814426`*^9}, {3.494189320351132*^9, 
   3.4941893689764175`*^9}, {3.4941960634447823`*^9, 3.494196109948464*^9}, {
   3.494196492625537*^9, 3.4941965253075943`*^9}, {3.4941967717568274`*^9, 
   3.4941967891820583`*^9}, {3.494198824027233*^9, 3.4941988799065313`*^9}, {
   3.5549115691980195`*^9, 3.5549115968580585`*^9}, {3.554912582239438*^9, 
   3.5549126668695564`*^9}, {3.5549164354848323`*^9, 3.554916460314867*^9}, {
   3.554916561565009*^9, 3.5549165719750233`*^9}, {3.5853498583310423`*^9, 
   3.5853498583310423`*^9}, 3.585350816572384*^9, {3.5853519065864096`*^9, 
   3.5853519087964125`*^9}, {3.5861901482330446`*^9, 3.5861901482330446`*^9}, 
   3.586190724633852*^9, {3.586968096958122*^9, 3.586968185123249*^9}, {
   3.586985186366493*^9, 3.5869852059365215`*^9}, {3.5869869891440716`*^9, 
   3.5869869898240724`*^9}, 3.62050169580215*^9, {3.620501750392272*^9, 
   3.620501791017596*^9}, {3.6209256961144156`*^9, 3.6209257068080273`*^9}, {
   3.6712122203891644`*^9, 3.6712122373831367`*^9}, {3.6712122713250775`*^9, 
   3.671212281716672*^9}, {3.6712125984707894`*^9, 3.6712126104024715`*^9}, {
   3.6713792999985075`*^9, 3.6713792999985075`*^9}, 3.671379450190776*^9, {
   3.752972757136236*^9, 3.752972774779867*^9}, 3.752972807290324*^9, 
   3.7534571910374665`*^9, 3.7534572259035277`*^9},
 TextAlignment->Center,
 FontSize->12,
 FontWeight->"Bold"],

Cell["Program code:", "Subsubsection",
 CellDingbat->"\[FilledSmallSquare]",
 CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
   3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9, 
   3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9, 
   3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
   3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9, 
   3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9, 
   3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9}, 
   3.4807050675119123`*^9, {3.492804314166378*^9, 3.4928043441496305`*^9}, {
   3.4928044532166224`*^9, 3.492804453513023*^9}, {3.492805162266266*^9, 
   3.492805165713872*^9}, 3.4941724567488375`*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"Int", "[", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"(", 
       RowBox[{"a_.", "+", 
        RowBox[{"b_.", "*", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c_.", "*", "x_"}], "]"}]}]}], ")"}], "^", "n_."}], "/", 
     "x_"}], ",", "x_Symbol"}], "]"}], " ", ":=", "\n", "  ", 
  RowBox[{
   RowBox[{
    RowBox[{"1", "/", "b"}], "*", 
    RowBox[{"Subst", "[", 
     RowBox[{
      RowBox[{"Int", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"x", "^", "n"}], "*", 
         RowBox[{"Coth", "[", 
          RowBox[{
           RowBox[{
            RowBox[{"-", "a"}], "/", "b"}], "+", 
           RowBox[{"x", "/", "b"}]}], "]"}]}], ",", "x"}], "]"}], ",", "x", 
      ",", 
      RowBox[{"a", "+", 
       RowBox[{"b", "*", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", "*", "x"}], "]"}]}]}]}], "]"}]}], " ", "/;", "\n", 
   RowBox[{
    RowBox[{"FreeQ", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"a", ",", "b", ",", "c"}], "}"}], ",", "x"}], "]"}], " ", "&&",
     " ", 
    RowBox[{"IGtQ", "[", 
     RowBox[{"n", ",", "0"}], "]"}]}]}]}]], "Code",
 CellChangeTimes->{{3.494097279728842*^9, 3.494097309778884*^9}, {
   3.494099665582182*^9, 3.4940996672021847`*^9}, {3.4940997193022575`*^9, 
   3.494099719662258*^9}, 3.4941724567488375`*^9, 3.494172717389202*^9, {
   3.4941763709899254`*^9, 3.49417638178994*^9}, 3.494176933060712*^9, {
   3.4941891975165157`*^9, 3.494189292692283*^9}, 3.4941894111744914`*^9, {
   3.4941961386609154`*^9, 3.494196199048621*^9}, 3.4941962310130777`*^9, {
   3.494196685551076*^9, 3.494196749355188*^9}, {3.494196855996975*^9, 
   3.494196887758631*^9}, {3.494197244138057*^9, 3.494197246946062*^9}, {
   3.494197819524268*^9, 3.4941978307718887`*^9}, {3.4941989675474854`*^9, 
   3.4941989999331427`*^9}, {3.494200557901883*^9, 3.4942005644018917`*^9}, {
   3.553560008788453*^9, 3.5535600110784564`*^9}, {3.554912771049702*^9, 
   3.554912814569763*^9}, 3.554912888029866*^9, {3.554916331074686*^9, 
   3.5549163312646866`*^9}, 3.5549164666348763`*^9, {3.5549166092250757`*^9, 
   3.5549166341951103`*^9}, 3.5549275597684135`*^9, {3.554932694456403*^9, 
   3.554932695816405*^9}, 3.554932822566582*^9, {3.554933326157287*^9, 
   3.554933340167307*^9}, 3.585349881911075*^9, 3.5853501078513913`*^9, 
   3.585350151621453*^9, 3.5853508903124866`*^9, 3.585351282413036*^9, {
   3.585352008146552*^9, 3.585352010226555*^9}, 3.5861902275831556`*^9, 
   3.586190276733225*^9, {3.5861907282838573`*^9, 3.586190728873858*^9}, 
   3.5869682634208612`*^9, {3.5869683181009398`*^9, 3.586968324595949*^9}, {
   3.586968439478614*^9, 3.5869684496486287`*^9}, 3.5869697850620594`*^9, {
   3.5869701425625734`*^9, 3.5869701521475873`*^9}, {3.5869702086776686`*^9, 
   3.586970234562706*^9}, {3.5869702875227823`*^9, 3.5869702968127956`*^9}, {
   3.5869704908780746`*^9, 3.5869705133931065`*^9}, {3.5869708000960197`*^9, 
   3.586970808086031*^9}, {3.5869852813566303`*^9, 3.586985318656684*^9}, {
   3.5869870236141195`*^9, 3.58698702395412*^9}, {3.586988063855576*^9, 
   3.586988074335591*^9}, {3.5870773925600586`*^9, 3.58707739339006*^9}, {
   3.620502007662987*^9, 3.6205020666253595`*^9}, {3.6209257154875236`*^9, 
   3.620925729153305*^9}, {3.671212857378598*^9, 3.671212858650671*^9}, {
   3.6712130120874467`*^9, 3.67121303608482*^9}, {3.671218636878166*^9, 
   3.6712186441125803`*^9}, 3.6712280364406767`*^9, {3.671379300014107*^9, 
   3.671379300014107*^9}, 3.671379521634101*^9, 3.7152179235916414`*^9, {
   3.752972825074355*^9, 3.752972835666774*^9}, 3.7534571761238403`*^9, 
   3.753457232346339*^9},
 Background->GrayLevel[0.85]],

Cell["", "Subsubsection",
 CellDingbat->None,
 CellChangeTimes->{3.4796643211106243`*^9, 3.4941724567488375`*^9}]
}, Closed]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\t", 
  RowBox[{Cell[TextData[StyleBox["2:",
    FontFamily->"Arial",
    FontColor->RGBColor[1, 0, 0]]], "None"], "  ", 
   RowBox[{"\[Integral]", 
    RowBox[{
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"d", " ", "x"}], ")"}], "m"], 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"a", "+", 
        RowBox[{"b", " ", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], 
     RowBox[{"\[DifferentialD]", "x"}], "  ", 
     StyleBox["when",
      FontFamily->"Arial",
      FontWeight->"Plain"], 
     StyleBox["  ",
      FontFamily->"Arial",
      FontWeight->"Plain"], Cell[TextData[Cell[BoxData[
      RowBox[{
       RowBox[{"n", "\[Element]", 
        SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}], "\[And]", " ", 
       RowBox[{"m", "\[NotEqual]", 
        RowBox[{"-", "1"}]}]}]]]], "None"]}]}]}]}]], "Subsubtitle",
 CellDingbat->None,
 CellChangeTimes->{
  3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
   3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9, 
   3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9, 
   3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9}, 
   3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9}, 
   3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9, 
   3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
   3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9, 
   3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
   3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9, 
   3.519247079685614*^9, {3.5193208582062006`*^9, 3.5193208612170057`*^9}, 
   3.5193325694253187`*^9, {3.5193422443984776`*^9, 3.5193422447260776`*^9}, 
   3.5193424488212357`*^9, {3.5193434708254333`*^9, 3.519343473103037*^9}, {
   3.5193435097631016`*^9, 3.51934353169674*^9}, {3.519345739319023*^9, 
   3.519345739599823*^9}, 3.5193462601259375`*^9, {3.5193475061060295`*^9, 
   3.5193475233908596`*^9}, {3.519351391880224*^9, 3.5193513931402254`*^9}, {
   3.519403773021052*^9, 3.5194037798564425`*^9}, 3.5194106793250647`*^9, {
   3.519537578341393*^9, 3.5195375792305946`*^9}, {3.5195376277778797`*^9, 
   3.51953767927357*^9}, {3.5197586260636144`*^9, 3.5197586260636144`*^9}, {
   3.51978053295651*^9, 3.519780542862528*^9}, {3.5197806526087203`*^9, 
   3.5197806657595434`*^9}, {3.5197807490168896`*^9, 3.5197807642581167`*^9}, 
   3.5197809004619555`*^9, {3.519782653514635*^9, 3.5197826623286505`*^9}, {
   3.5200207810164795`*^9, 3.520020785046485*^9}, {3.5213126833374643`*^9, 
   3.5213126833374643`*^9}, {3.521328235411002*^9, 3.521328235411002*^9}, {
   3.523315567893022*^9, 3.523315567893022*^9}, {3.5233157569332867`*^9, 
   3.5233157613032923`*^9}, {3.5323023198133526`*^9, 3.532302355723403*^9}, {
   3.5323026417638035`*^9, 3.5323026417638035`*^9}, {3.5323026980138817`*^9, 
   3.5323026980138817`*^9}, {3.532636287104328*^9, 3.532636287104328*^9}, {
   3.5330803686035347`*^9, 3.533080368863535*^9}, {3.533248909289961*^9, 
   3.5332489110299635`*^9}, {3.534962469565694*^9, 3.5349624910757236`*^9}, {
   3.5349625224057674`*^9, 3.534962522655768*^9}, {3.534965265519608*^9, 
   3.534965265519608*^9}, {3.5349668288168063`*^9, 3.5349668292668066`*^9}, {
   3.5349747358481646`*^9, 3.5349747358481646`*^9}, {3.534975457949176*^9, 
   3.534975457949176*^9}, {3.5368633963532934`*^9, 3.536863396571694*^9}, {
   3.541644322511304*^9, 3.5416443577513533`*^9}, {3.5416458269234104`*^9, 
   3.541645839633428*^9}, {3.5416460312236967`*^9, 3.541646031483697*^9}, 
   3.541646227783972*^9, {3.541647080335165*^9, 3.5416471077052035`*^9}, {
   3.541648997607849*^9, 3.5416489978278494`*^9}, 3.541649088407976*^9, {
   3.5417848711596775`*^9, 3.541784902429721*^9}, {3.541786145331461*^9, 
   3.5417861455914617`*^9}, {3.5417870037166634`*^9, 3.5417870039366636`*^9}, 
   3.5462979620242105`*^9, {3.546298264094633*^9, 3.546298265344635*^9}, {
   3.546299000235664*^9, 3.546299001505666*^9}, {3.546315119909564*^9, 
   3.5463151267659564`*^9}, {3.547227356319705*^9, 3.547227356319705*^9}, 
   3.547918559331044*^9, {3.547918610170952*^9, 3.5479186304411116`*^9}, 
   3.548537755517557*^9, 3.5485441629685287`*^9, 3.5485517520154133`*^9, {
   3.5488740727887154`*^9, 3.5488740727887154`*^9}, {3.548874206618903*^9, 
   3.548874206808903*^9}, 3.548877100795455*^9, 3.550596464087599*^9, {
   3.5505965767870445`*^9, 3.5505965767870445`*^9}, 3.5505966202465305`*^9, {
   3.5506039138305197`*^9, 3.55060391400453*^9}, {3.5506040039986773`*^9, 
   3.550604005776779*^9}, {3.5506178888272758`*^9, 3.5506178900273447`*^9}, {
   3.550770598144562*^9, 3.550770659629079*^9}, {3.5507707252908344`*^9, 
   3.5507707474461017`*^9}, 3.5507880023630266`*^9, {3.5508017696214375`*^9, 
   3.5508017788269644`*^9}, {3.5508018116158395`*^9, 3.5508018116158395`*^9}, 
   3.5508018976437597`*^9, {3.5508021384015307`*^9, 3.550802155115487*^9}, {
   3.5508022151019173`*^9, 3.5508022151019173`*^9}, {3.550802487106476*^9, 
   3.5508025179152374`*^9}, {3.5508029261175857`*^9, 
   3.5508029342300496`*^9}, {3.5521511708590136`*^9, 3.5521511712334137`*^9}, 
   3.552151666269083*^9, {3.5535324250863676`*^9, 3.553532441643315*^9}, {
   3.553532476791325*^9, 3.553532477502366*^9}, 3.553532677104782*^9, 
   3.553535197344932*^9, {3.55353551200593*^9, 3.5535355292779174`*^9}, {
   3.553535652504881*^9, 3.5535356543924847`*^9}, {3.5549205830406413`*^9, 
   3.5549206114906807`*^9}, {3.5549308888338747`*^9, 
   3.5549309083539023`*^9}, {3.554931435854641*^9, 3.554931436064641*^9}, {
   3.5549322334657574`*^9, 3.5549322565857897`*^9}, {3.5549353682701464`*^9, 
   3.554935391020178*^9}, {3.554935426840228*^9, 3.5549354282902303`*^9}, {
   3.555033837273942*^9, 3.5550338379339433`*^9}, 3.555192038926259*^9, {
   3.5551954393656588`*^9, 3.555195441485662*^9}, {3.5551955518058167`*^9, 
   3.555195552035817*^9}, {3.5551955952058773`*^9, 3.5551956072558937`*^9}, {
   3.55519569731602*^9, 3.5551956975160203`*^9}, {3.555197194648116*^9, 
   3.55519719743812*^9}, {3.555197458228485*^9, 3.555197458508486*^9}, 
   3.555198698680222*^9, {3.555199705331631*^9, 3.5551997224916553`*^9}, {
   3.5552515664863663`*^9, 3.5552515664863663`*^9}, {3.555251683252571*^9, 
   3.555251701910204*^9}, {3.5552526803751225`*^9, 3.555252680593523*^9}, {
   3.58621170339386*^9, 3.586211705488863*^9}, {3.5862125930151515`*^9, 
   3.586212593235152*^9}, {3.5863114862575855`*^9, 3.5863114864075856`*^9}, {
   3.5863607978812284`*^9, 3.586360800196232*^9}, {3.58636092405641*^9, 
   3.5863609249564114`*^9}, 3.586360964686468*^9, 3.58636100788653*^9, 
   3.586361046841586*^9, {3.586364293468548*^9, 3.58636429510855*^9}, {
   3.5863650826846805`*^9, 3.586365082824681*^9}, {3.586968648036414*^9, 
   3.5869686481964145`*^9}, {3.5869832290261755`*^9, 
   3.5869832290261755`*^9}, {3.586983397656419*^9, 3.586983397836419*^9}, {
   3.5869848315109825`*^9, 3.586984831870983*^9}, 3.620157935170122*^9, 
   3.620268621175521*^9, {3.6712141011137357`*^9, 3.671214131645482*^9}, 
   3.671379300029707*^9},
 FontSize->12,
 FontWeight->"Bold"],

Cell["Derivation: Integration by parts", "Subsubsection",
 CellChangeTimes->{
  3.4941724567488375`*^9, 3.494172818179343*^9, {3.495045874395023*^9, 
   3.495045875835025*^9}, {3.4950462556855564`*^9, 3.495046257635559*^9}, 
   3.553373119004768*^9}],

Cell[TextData[{
 "Basis: ",
 Cell[BoxData[
  RowBox[{
   RowBox[{
    SubscriptBox["\[PartialD]", "x"], 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"a", "+", 
       RowBox[{"b", " ", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"]}], "\[Equal]", 
   FractionBox[
    RowBox[{"b", " ", "c", " ", "n", " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"a", "+", 
        RowBox[{"b", " ", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], 
      RowBox[{"n", "-", "1"}]]}], 
    SqrtBox[
     RowBox[{"1", "+", 
      RowBox[{
       SuperscriptBox["c", "2"], " ", 
       SuperscriptBox["x", "2"]}]}]]]}]], "Input",
  CellChangeTimes->{{3.586566688639513*^9, 3.586566713339547*^9}, {
    3.586567111720105*^9, 3.5865671350101376`*^9}, {3.586567519960676*^9, 
    3.5865675376207013`*^9}, 3.586567570720748*^9, {3.58656788675119*^9, 
    3.58656790809122*^9}, {3.586567943031269*^9, 3.5865680220613794`*^9}, {
    3.586568118811515*^9, 3.586568119461516*^9}, {3.5865681534515634`*^9, 
    3.5865681775415974`*^9}, {3.5865682092116413`*^9, 
    3.5865682434616895`*^9}, {3.5865682763917356`*^9, 3.5865683413518267`*^9}}]
}], "Subsubsection",
 CellChangeTimes->{{3.5813762364323072`*^9, 3.581376326802434*^9}, {
   3.5813826880473433`*^9, 3.5813826880473433`*^9}, {3.581720310829357*^9, 
   3.581720310829357*^9}, {3.581720366149435*^9, 3.581720366149435*^9}, {
   3.5817204073994923`*^9, 3.5817204073994923`*^9}, {3.581720524929657*^9, 
   3.581720524929657*^9}, {3.5864633734979143`*^9, 3.5864633862354326`*^9}, {
   3.586463493968087*^9, 3.586463494893089*^9}, {3.5864635381531506`*^9, 
   3.5864635393731527`*^9}, {3.586463685870864*^9, 3.586463685870864*^9}, {
   3.58646382210106*^9, 3.58646382210106*^9}, {3.5864732982240467`*^9, 
   3.5864732982240467`*^9}, {3.586485090653509*^9, 3.586485090653509*^9}, {
   3.586485180371138*^9, 3.586485180371138*^9}, {3.5864852213711967`*^9, 
   3.5864852213711967`*^9}, {3.586494187606468*^9, 3.5864942133777137`*^9}, {
   3.5865432242749014`*^9, 3.5865432242749014`*^9}, {3.5865463088192196`*^9, 
   3.586546312729225*^9}, {3.586546396929343*^9, 3.5865464175093718`*^9}, {
   3.5865464529294214`*^9, 3.5865464529294214`*^9}, {3.586546532519533*^9, 
   3.586546532519533*^9}, {3.5865468163899307`*^9, 3.5865468386399612`*^9}, {
   3.5865491636532164`*^9, 3.5865491636532164`*^9}, {3.5865492145532875`*^9, 
   3.5865492145532875`*^9}, {3.586551856136986*^9, 3.586551856136986*^9}, {
   3.5865607519912014`*^9, 3.5865607519912014`*^9}, {3.586563741525387*^9, 
   3.5865638039054737`*^9}, {3.5865678077210793`*^9, 3.586567824111102*^9}, 
   3.586568533272095*^9, {3.5865688286425085`*^9, 3.5865688286425085`*^9}, {
   3.586568997022744*^9, 3.586568997022744*^9}, {3.5865691763429956`*^9, 
   3.5865691763429956`*^9}, {3.5865833764756064`*^9, 
   3.5865833764756064`*^9}, {3.620501915857736*^9, 3.620501915857736*^9}, {
   3.6712128305470634`*^9, 3.6712128305470634`*^9}, {3.6713792999829073`*^9, 
   3.6713792999829073`*^9}, {3.6713794435607643`*^9, 
   3.6713794435607643`*^9}, {3.751308971135766*^9, 3.751308971813805*^9}, {
   3.7513090956018853`*^9, 3.7513090956018853`*^9}, {3.751309217850878*^9, 
   3.7513092178518777`*^9}, {3.7529665761147313`*^9, 
   3.7529665761147313`*^9}, {3.7529729315445423`*^9, 3.752972960451393*^9}}],

Cell[TextData[{
 "Rule: If  ",
 Cell[BoxData[
  RowBox[{
   RowBox[{"n", "\[Element]", 
    SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}], "\[And]", " ", 
   RowBox[{"m", "\[NotEqual]", 
    RowBox[{"-", "1"}]}]}]]],
 ", then"
}], "Subsubsection",
 CellDingbat->"\[FilledSmallSquare]",
 CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
   3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9, 
   3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9, 
   3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
   3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9, 
   3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9, 
   3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9}, 
   3.48070534977779*^9, {3.4928296953212276`*^9, 3.492829707041244*^9}, 
   3.4941724084687696`*^9, 3.4941724567488375`*^9, {3.4941737492506466`*^9, 
   3.4941737506706486`*^9}, {3.494173966810951*^9, 3.494174007671008*^9}, {
   3.4941741326011834`*^9, 3.4941741425911975`*^9}, {3.4941767936905165`*^9, 
   3.494176809630539*^9}, {3.4941773316412697`*^9, 3.494177333751273*^9}, {
   3.4941891756608777`*^9, 3.494189178765283*^9}, {3.4942004775317707`*^9, 
   3.494200477881771*^9}, {3.4950424099901724`*^9, 3.495042435550208*^9}, {
   3.495045573264601*^9, 3.4950455868746204`*^9}, {3.5533778848417416`*^9, 
   3.55337789792449*^9}, {3.5535355634443245`*^9, 3.5535355634443245`*^9}, {
   3.5549309146039114`*^9, 3.5549309146039114`*^9}, {3.554935398190188*^9, 
   3.554935398190188*^9}, {3.554935438010244*^9, 3.554935438010244*^9}, {
   3.555033842213949*^9, 3.555033842213949*^9}, {3.55519561866591*^9, 
   3.55519561866591*^9}, {3.5551973155382853`*^9, 3.5551973155382853`*^9}, {
   3.5552507987466173`*^9, 3.5552507987466173`*^9}, {3.555251708290615*^9, 
   3.555251708290615*^9}, {3.5863609285464163`*^9, 3.5863609299914184`*^9}, {
   3.5869832316511793`*^9, 3.5869832316511793`*^9}, {3.6712141258361497`*^9, 
   3.6712141258361497`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"\[Integral]", 
   RowBox[{
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"d", " ", "x"}], ")"}], "m"], 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"a", "+", 
       RowBox[{"b", " ", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], 
    RowBox[{"\[DifferentialD]", 
     RowBox[{"x", "  ", "\[LongRightArrow]", "  ", 
      FractionBox[
       RowBox[{
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{"d", " ", "x"}], ")"}], 
         RowBox[{"m", "+", "1"}]], 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{"a", "+", 
           RowBox[{"b", " ", 
            RowBox[{"ArcSinh", "[", 
             RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"]}], 
       RowBox[{"d", 
        RowBox[{"(", 
         RowBox[{"m", "+", "1"}], ")"}]}]]}]}]}]}], "-", 
  RowBox[{
   FractionBox[
    RowBox[{"b", " ", "c", " ", "n"}], 
    RowBox[{"d", 
     RowBox[{"(", 
      RowBox[{"m", "+", "1"}], ")"}]}]], 
   RowBox[{"\[Integral]", 
    RowBox[{
     FractionBox[
      RowBox[{
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{"d", " ", "x"}], ")"}], 
        RowBox[{"m", "+", "1"}]], 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{"a", "+", 
          RowBox[{"b", " ", 
           RowBox[{"ArcSinh", "[", 
            RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], 
        RowBox[{"n", "-", "1"}]]}], 
      SqrtBox[
       RowBox[{"1", "+", 
        RowBox[{
         SuperscriptBox["c", "2"], " ", 
         SuperscriptBox["x", "2"]}]}]]], 
     RowBox[{"\[DifferentialD]", "x"}]}]}]}]}]], "Subsubtitle",
 CellDingbat->None,
 CellChangeTimes->{{3.4796579732027807`*^9, 3.479658002474872*^9}, {
   3.4796580599975853`*^9, 3.4796580609489536`*^9}, {3.479658295195784*^9, 
   3.47965829684816*^9}, 3.4796611938939075`*^9, 3.4796613924794593`*^9, {
   3.479661443342597*^9, 3.479661446647349*^9}, {3.479661576554146*^9, 
   3.479661589302477*^9}, 3.479661847553824*^9, {3.4796622294729967`*^9, 
   3.4796622450654173`*^9}, {3.479686720424531*^9, 3.4796867204345455`*^9}, {
   3.4796874646646957`*^9, 3.4796874745589232`*^9}, {3.492826573513727*^9, 
   3.492826578630536*^9}, {3.4928267070863624`*^9, 3.492826707460763*^9}, 
   3.4928267903497095`*^9, {3.492829799151373*^9, 3.4928299617216005`*^9}, {
   3.4940972077187414`*^9, 3.4940972347887793`*^9}, {3.49409966398218*^9, 
   3.494099664952181*^9}, {3.4940997156722527`*^9, 3.494099716112253*^9}, 
   3.4941724567488375`*^9, {3.4941727384192314`*^9, 3.494172760679263*^9}, {
   3.4941763955899596`*^9, 3.4941764290900064`*^9}, {3.4941764605500507`*^9, 
   3.4941764930400963`*^9}, {3.4941882372412295`*^9, 3.49418823769363*^9}, {
   3.4950421850198574`*^9, 3.4950422389399333`*^9}, {3.495045295774213*^9, 
   3.495045310274233*^9}, {3.4950453750643234`*^9, 3.4950453777743273`*^9}, {
   3.495045490884486*^9, 3.4950454957944927`*^9}, {3.553368718813157*^9, 
   3.553368809340116*^9}, {3.5549303571831307`*^9, 3.554930396443186*^9}, {
   3.554930437533243*^9, 3.5549304634232793`*^9}, 3.5549305254833665`*^9, {
   3.554930589243456*^9, 3.554930617493495*^9}, 3.5862788834076395`*^9, {
   3.5863608076262426`*^9, 3.586360820456261*^9}, {3.586360965441469*^9, 
   3.5863609683564734`*^9}, {3.5863610189915457`*^9, 
   3.5863610205265484`*^9}, {3.586361052396594*^9, 3.586361055186598*^9}, {
   3.671214134612652*^9, 3.6712141537697477`*^9}, {3.671379300045307*^9, 
   3.6713793000609074`*^9}, 3.6713797710398564`*^9},
 TextAlignment->Center,
 FontSize->12,
 FontWeight->"Bold"],

Cell["Program code:", "Subsubsection",
 CellDingbat->"\[FilledSmallSquare]",
 CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
   3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9, 
   3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9, 
   3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
   3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9, 
   3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9, 
   3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9}, 
   3.4807050675119123`*^9, {3.492804314166378*^9, 3.4928043441496305`*^9}, {
   3.4928044532166224`*^9, 3.492804453513023*^9}, {3.492805162266266*^9, 
   3.492805165713872*^9}, 3.4941724567488375`*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"Int", "[", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"(", 
       RowBox[{"d_.", "*", "x_"}], ")"}], "^", "m_."}], "*", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{"a_.", "+", 
        RowBox[{"b_.", "*", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c_.", "*", "x_"}], "]"}]}]}], ")"}], "^", "n_."}]}], ",", 
    "x_Symbol"}], "]"}], " ", ":=", "\n", "  ", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"(", 
       RowBox[{"d", "*", "x"}], ")"}], "^", 
      RowBox[{"(", 
       RowBox[{"m", "+", "1"}], ")"}]}], "*", 
     RowBox[{
      RowBox[{
       RowBox[{"(", 
        RowBox[{"a", "+", 
         RowBox[{"b", "*", 
          RowBox[{"ArcSinh", "[", 
           RowBox[{"c", "*", "x"}], "]"}]}]}], ")"}], "^", "n"}], "/", 
      RowBox[{"(", 
       RowBox[{"d", "*", 
        RowBox[{"(", 
         RowBox[{"m", "+", "1"}], ")"}]}], ")"}]}]}], " ", "-", " ", 
    "\[IndentingNewLine]", "  ", 
    RowBox[{"b", "*", "c", "*", 
     RowBox[{"n", "/", 
      RowBox[{"(", 
       RowBox[{"d", "*", 
        RowBox[{"(", 
         RowBox[{"m", "+", "1"}], ")"}]}], ")"}]}], "*", 
     RowBox[{"Int", "[", 
      RowBox[{
       RowBox[{
        RowBox[{
         RowBox[{"(", 
          RowBox[{"d", "*", "x"}], ")"}], "^", 
         RowBox[{"(", 
          RowBox[{"m", "+", "1"}], ")"}]}], "*", 
        RowBox[{
         RowBox[{
          RowBox[{"(", 
           RowBox[{"a", "+", 
            RowBox[{"b", "*", 
             RowBox[{"ArcSinh", "[", 
              RowBox[{"c", "*", "x"}], "]"}]}]}], ")"}], "^", 
          RowBox[{"(", 
           RowBox[{"n", "-", "1"}], ")"}]}], "/", 
         RowBox[{"Sqrt", "[", 
          RowBox[{"1", "+", 
           RowBox[{
            RowBox[{"c", "^", "2"}], "*", 
            RowBox[{"x", "^", "2"}]}]}], "]"}]}]}], ",", "x"}], "]"}]}]}], 
   " ", "/;", "\n", 
   RowBox[{
    RowBox[{"FreeQ", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "m"}], "}"}], ",", 
      "x"}], "]"}], " ", "&&", " ", 
    RowBox[{"IGtQ", "[", 
     RowBox[{"n", ",", "0"}], "]"}], " ", "&&", " ", 
    RowBox[{"NeQ", "[", 
     RowBox[{"m", ",", 
      RowBox[{"-", "1"}]}], "]"}]}]}]}]], "Code",
 CellChangeTimes->{{3.494097279728842*^9, 3.494097309778884*^9}, {
   3.494099665582182*^9, 3.4940996672021847`*^9}, {3.4940997193022575`*^9, 
   3.494099719662258*^9}, 3.4941724567488375`*^9, 3.494172717389202*^9, {
   3.4941763709899254`*^9, 3.49417638178994*^9}, {3.4950424525902324`*^9, 
   3.4950425131303167`*^9}, {3.495045395254352*^9, 3.4950455421745577`*^9}, {
   3.495045613344657*^9, 3.495045623144671*^9}, 3.495046501655901*^9, 
   3.495047583047415*^9, 3.4950476263774757`*^9, 3.553373242560835*^9, {
   3.5533733015562096`*^9, 3.5533733049994063`*^9}, 3.553377717427166*^9, {
   3.553377865647644*^9, 3.553377874009122*^9}, {3.553402502413335*^9, 
   3.5534025332833786`*^9}, {3.5534035146147523`*^9, 3.553403612484889*^9}, {
   3.553468670048935*^9, 3.5534686745161796`*^9}, {3.5534688089220047`*^9, 
   3.55346883384204*^9}, 3.5535646024048843`*^9, 3.5549307021136136`*^9, 
   3.5549307778237195`*^9, 3.5549308447738132`*^9, {3.55493200677544*^9, 
   3.5549320070354404`*^9}, {3.554935254679987*^9, 3.5549352848900294`*^9}, 
   3.5550338459439545`*^9, 3.5551972087981358`*^9, 3.555250732602502*^9, {
   3.555250768420164*^9, 3.5552508159846478`*^9}, {3.555251631928481*^9, 
   3.555251662098934*^9}, 3.5552517425482755`*^9, {3.5552518183644085`*^9, 
   3.555251824479619*^9}, 3.555251935208614*^9, 3.5552526411566534`*^9, 
   3.586211846591567*^9, 3.5862122402446394`*^9, 3.586278907072881*^9, {
   3.586360835011282*^9, 3.586360856206312*^9}, {3.5863609016113777`*^9, 
   3.586360902591379*^9}, {3.586360941621435*^9, 3.5863609420514355`*^9}, {
   3.586360972276479*^9, 3.5863609760464845`*^9}, {3.5863610239265532`*^9, 
   3.5863610596966047`*^9}, 3.586363979408296*^9, {3.5869773826555023`*^9, 
   3.58697742254056*^9}, {3.5869831868086147`*^9, 3.5869831972936296`*^9}, 
   3.586983328233819*^9, 3.5869833634113693`*^9, 3.5869848057009454`*^9, {
   3.6712142164853344`*^9, 3.6712142573756733`*^9}, {3.6713793000609074`*^9, 
   3.6713793000765076`*^9}, 3.671379830850761*^9, 3.7061414802880945`*^9, {
   3.715217923626643*^9, 3.7152179318301125`*^9}},
 Background->GrayLevel[0.85]],

Cell["", "Subsubsection",
 CellDingbat->None,
 CellChangeTimes->{3.4796643211106243`*^9, 3.4941724567488375`*^9}]
}, Closed]]
}, Closed]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{Cell[TextData[StyleBox["2.",
   FontFamily->"Arial"]], "None"], "  ", 
  RowBox[{"\[Integral]", 
   RowBox[{
    SuperscriptBox["x", "m"], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"a", "+", 
       RowBox[{"b", " ", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], 
    RowBox[{"\[DifferentialD]", "x"}], "  ", 
    StyleBox["when",
     FontFamily->"Arial",
     FontWeight->"Plain"], 
    StyleBox["  ",
     FontFamily->"Arial",
     FontWeight->"Plain"], Cell[TextData[Cell[BoxData[
     RowBox[{"m", "\[Element]", 
      SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}]]]], 
     "None"]}]}]}]], "Subsubtitle",
 CellDingbat->None,
 CellChangeTimes->{
  3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
   3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9, 
   3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9, 
   3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9}, 
   3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9}, 
   3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9, 
   3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
   3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9, 
   3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
   3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9, 
   3.519247079685614*^9, {3.5193208582062006`*^9, 3.5193208612170057`*^9}, 
   3.5193325694253187`*^9, {3.5193415004828687`*^9, 3.5193415113404875`*^9}, {
   3.5193513965602303`*^9, 3.519351397420232*^9}, {3.5194037839416766`*^9, 
   3.5194037847117205`*^9}, 3.52105258275843*^9, 3.5210531741726685`*^9, {
   3.521057461672199*^9, 3.5210574760242243`*^9}, {3.521059881564049*^9, 
   3.521059886088057*^9}, {3.5213902158895197`*^9, 3.521390217543123*^9}, {
   3.521390827878595*^9, 3.521390829376197*^9}, {3.5214688792561245`*^9, 
   3.521468879443325*^9}, {3.523320201951167*^9, 3.523320202247567*^9}, {
   3.5288596764894824`*^9, 3.5288596768094826`*^9}, {3.529196266260353*^9, 
   3.5291962665099535`*^9}, {3.5291997050223927`*^9, 
   3.5291997052563934`*^9}, {3.529201346457276*^9, 3.529201347252877*^9}, {
   3.529285041073242*^9, 3.5292850412632427`*^9}, {3.529285215443486*^9, 
   3.529285215443486*^9}, {3.5295115356999426`*^9, 3.5295115433443794`*^9}, {
   3.529521412127842*^9, 3.529521414647986*^9}, {3.529529429975619*^9, 
   3.529529432955224*^9}, 3.5340074894011116`*^9, 3.5415537711400824`*^9, {
   3.5415538454742126`*^9, 3.54155384951462*^9}, {3.5417297197063265`*^9, 
   3.5417297252443366`*^9}, {3.546297494083555*^9, 3.5462974982435613`*^9}, {
   3.5462989134855423`*^9, 3.5462989153655453`*^9}, 3.548544146508506*^9, 
   3.5488738855784535`*^9, {3.5505953688729563`*^9, 3.5505953726861744`*^9}, {
   3.550619508681926*^9, 3.5506195174954305`*^9}, {3.5508023692987375`*^9, 
   3.550802389570897*^9}, {3.550802668197833*^9, 3.5508026783084116`*^9}, {
   3.5508027313334446`*^9, 3.550802732037485*^9}, {3.5508103505662394`*^9, 
   3.5508103516062994`*^9}, {3.5511121277291827`*^9, 3.551112128241212*^9}, {
   3.552151135665351*^9, 3.552151135883752*^9}, 3.5521516632426777`*^9, 
   3.553532228232108*^9, {3.553534887396204*^9, 3.553534918930008*^9}, {
   3.5535356451416683`*^9, 3.553535645438069*^9}, 3.5535368896088223`*^9, {
   3.55353837272647*^9, 3.55353837272647*^9}, {3.553538438366562*^9, 
   3.5535384385765624`*^9}, {3.554920815170966*^9, 3.5549208154109664`*^9}, {
   3.5549462357353606`*^9, 3.554946259655394*^9}, 3.555093906105858*^9, {
   3.5550975426209493`*^9, 3.5550975449709525`*^9}, {3.5550976100110435`*^9, 
   3.555097611001045*^9}, {3.5550980172416134`*^9, 3.5550980172416134`*^9}, {
   3.5551922050464916`*^9, 3.5551922142265043`*^9}, {3.5551987008602247`*^9, 
   3.5551987011102257`*^9}, {3.5551997319916687`*^9, 
   3.5551997345716724`*^9}, {3.555199780981737*^9, 3.555199781151737*^9}, {
   3.555254043287116*^9, 3.555254043739517*^9}, 3.5853498576010413`*^9, {
   3.585350705892229*^9, 3.5853507075322313`*^9}, {3.5853507571323004`*^9, 
   3.5853507666123133`*^9}, 3.5861901476630435`*^9, 3.5863642193134413`*^9, {
   3.586819819882893*^9, 3.5868198310029087`*^9}, {3.5869679653204327`*^9, 
   3.5869679653204327`*^9}, 3.5869680286455235`*^9, 3.5869689554218593`*^9, {
   3.586984855221017*^9, 3.586984858388521*^9}, {3.5869858373449306`*^9, 
   3.5869858404699354`*^9}, 3.586988724746501*^9, {3.5869915440504484`*^9, 
   3.5869915456404505`*^9}, 3.6201579365051985`*^9, 3.6202686228796186`*^9, {
   3.62026989570142*^9, 3.6202698995636406`*^9}, 3.671214870310731*^9, {
   3.671215034915146*^9, 3.671215050265024*^9}, {3.6712159089991407`*^9, 
   3.6712159089991407`*^9}, 3.6713793000921073`*^9},
 FontSize->12,
 FontWeight->"Bold"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\t", 
  RowBox[{Cell[TextData[StyleBox["1:",
    FontFamily->"Arial",
    FontColor->RGBColor[1, 0, 0]]], "None"], "  ", 
   RowBox[{"\[Integral]", 
    RowBox[{
     SuperscriptBox["x", "m"], 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"a", "+", 
        RowBox[{"b", " ", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], 
     RowBox[{"\[DifferentialD]", "x"}], "  ", 
     StyleBox["when",
      FontFamily->"Arial",
      FontWeight->"Plain"], 
     StyleBox["  ",
      FontFamily->"Arial",
      FontWeight->"Plain"], Cell[TextData[Cell[BoxData[
      RowBox[{
       RowBox[{"m", "\[Element]", 
        SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}], "\[And]", " ", 
       RowBox[{"n", ">", "0"}]}]]]], "None"]}]}]}]}]], "Subsubtitle",
 CellDingbat->None,
 CellChangeTimes->{
  3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
   3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9, 
   3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9, 
   3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9}, 
   3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9}, 
   3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9, 
   3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
   3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9, 
   3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
   3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9, 
   3.519247079685614*^9, {3.5193208582062006`*^9, 3.5193208612170057`*^9}, 
   3.5193325694253187`*^9, {3.5193422443984776`*^9, 3.5193422447260776`*^9}, 
   3.5193424488212357`*^9, {3.5193434708254333`*^9, 3.519343473103037*^9}, {
   3.5193435097631016`*^9, 3.51934353169674*^9}, {3.519345739319023*^9, 
   3.519345739599823*^9}, 3.5193462601259375`*^9, {3.5193475061060295`*^9, 
   3.5193475233908596`*^9}, {3.519351391880224*^9, 3.5193513931402254`*^9}, {
   3.519403773021052*^9, 3.5194037798564425`*^9}, 3.5194106793250647`*^9, {
   3.519537578341393*^9, 3.5195375792305946`*^9}, {3.5195376277778797`*^9, 
   3.51953767927357*^9}, {3.5197586260636144`*^9, 3.5197586260636144`*^9}, {
   3.51978053295651*^9, 3.519780542862528*^9}, {3.5197806526087203`*^9, 
   3.5197806657595434`*^9}, {3.5197807490168896`*^9, 3.5197807642581167`*^9}, 
   3.5197809004619555`*^9, {3.519782653514635*^9, 3.5197826623286505`*^9}, {
   3.5200207810164795`*^9, 3.520020785046485*^9}, {3.5213126833374643`*^9, 
   3.5213126833374643`*^9}, {3.521328235411002*^9, 3.521328235411002*^9}, {
   3.523315567893022*^9, 3.523315567893022*^9}, {3.5233157569332867`*^9, 
   3.5233157613032923`*^9}, {3.5323023198133526`*^9, 3.532302355723403*^9}, {
   3.5323026417638035`*^9, 3.5323026417638035`*^9}, {3.5323026980138817`*^9, 
   3.5323026980138817`*^9}, {3.532636287104328*^9, 3.532636287104328*^9}, {
   3.5330803686035347`*^9, 3.533080368863535*^9}, {3.533248909289961*^9, 
   3.5332489110299635`*^9}, {3.534962469565694*^9, 3.5349624910757236`*^9}, {
   3.5349625224057674`*^9, 3.534962522655768*^9}, {3.534965265519608*^9, 
   3.534965265519608*^9}, {3.5349668288168063`*^9, 3.5349668292668066`*^9}, {
   3.5349747358481646`*^9, 3.5349747358481646`*^9}, {3.534975457949176*^9, 
   3.534975457949176*^9}, {3.5368633963532934`*^9, 3.536863396571694*^9}, {
   3.541644322511304*^9, 3.5416443577513533`*^9}, {3.5416458269234104`*^9, 
   3.541645839633428*^9}, {3.5416460312236967`*^9, 3.541646031483697*^9}, 
   3.541646227783972*^9, {3.541647080335165*^9, 3.5416471077052035`*^9}, {
   3.541648997607849*^9, 3.5416489978278494`*^9}, 3.541649088407976*^9, {
   3.5417848711596775`*^9, 3.541784902429721*^9}, {3.541786145331461*^9, 
   3.5417861455914617`*^9}, {3.5417870037166634`*^9, 3.5417870039366636`*^9}, 
   3.5462979620242105`*^9, {3.546298264094633*^9, 3.546298265344635*^9}, {
   3.546299000235664*^9, 3.546299001505666*^9}, {3.546315119909564*^9, 
   3.5463151267659564`*^9}, {3.547227356319705*^9, 3.547227356319705*^9}, 
   3.547918559331044*^9, {3.547918610170952*^9, 3.5479186304411116`*^9}, 
   3.548537755517557*^9, 3.5485441629685287`*^9, 3.5485517520154133`*^9, {
   3.5488740727887154`*^9, 3.5488740727887154`*^9}, {3.548874206618903*^9, 
   3.548874206808903*^9}, 3.548877100795455*^9, 3.550596464087599*^9, {
   3.5505965767870445`*^9, 3.5505965767870445`*^9}, 3.5505966202465305`*^9, {
   3.5506039138305197`*^9, 3.55060391400453*^9}, {3.5506040039986773`*^9, 
   3.550604005776779*^9}, {3.5506178888272758`*^9, 3.5506178900273447`*^9}, {
   3.550770598144562*^9, 3.550770659629079*^9}, {3.5507707252908344`*^9, 
   3.5507707474461017`*^9}, 3.5507880023630266`*^9, {3.5508017696214375`*^9, 
   3.5508017788269644`*^9}, {3.5508018116158395`*^9, 3.5508018116158395`*^9}, 
   3.5508018976437597`*^9, {3.5508021384015307`*^9, 3.550802155115487*^9}, {
   3.5508022151019173`*^9, 3.5508022151019173`*^9}, {3.550802487106476*^9, 
   3.5508025179152374`*^9}, {3.5508029261175857`*^9, 
   3.5508029342300496`*^9}, {3.5521511708590136`*^9, 3.5521511712334137`*^9}, 
   3.552151666269083*^9, {3.5535324250863676`*^9, 3.553532441643315*^9}, {
   3.553532476791325*^9, 3.553532477502366*^9}, 3.553532677104782*^9, 
   3.553535197344932*^9, {3.55353551200593*^9, 3.5535355292779174`*^9}, {
   3.553535652504881*^9, 3.5535356543924847`*^9}, {3.5549205830406413`*^9, 
   3.5549206114906807`*^9}, {3.5549308888338747`*^9, 
   3.5549309083539023`*^9}, {3.554931435854641*^9, 3.554931436064641*^9}, {
   3.5549322334657574`*^9, 3.5549322565857897`*^9}, {3.5549353682701464`*^9, 
   3.554935391020178*^9}, {3.554935426840228*^9, 3.5549354282902303`*^9}, {
   3.555033837273942*^9, 3.5550338379339433`*^9}, 3.555192038926259*^9, {
   3.5551954393656588`*^9, 3.555195441485662*^9}, {3.5551955518058167`*^9, 
   3.555195552035817*^9}, {3.5551955952058773`*^9, 3.5551956072558937`*^9}, {
   3.55519569731602*^9, 3.5551956975160203`*^9}, {3.555197194648116*^9, 
   3.55519719743812*^9}, {3.555197458228485*^9, 3.555197458508486*^9}, 
   3.555198698680222*^9, {3.555199705331631*^9, 3.5551997224916553`*^9}, {
   3.5552515664863663`*^9, 3.5552515664863663`*^9}, {3.555251683252571*^9, 
   3.555251701910204*^9}, {3.5552526803751225`*^9, 3.555252680593523*^9}, {
   3.58621170339386*^9, 3.586211705488863*^9}, {3.5862125930151515`*^9, 
   3.586212593235152*^9}, {3.5863114862575855`*^9, 3.5863114864075856`*^9}, {
   3.5863607978812284`*^9, 3.586360800196232*^9}, {3.58636092405641*^9, 
   3.5863609249564114`*^9}, 3.586360964686468*^9, 3.58636100788653*^9, 
   3.586361046841586*^9, {3.586364293468548*^9, 3.58636429510855*^9}, {
   3.5863650826846805`*^9, 3.586365082824681*^9}, {3.586968648036414*^9, 
   3.5869686481964145`*^9}, {3.5869832290261755`*^9, 
   3.5869832290261755`*^9}, {3.586983397656419*^9, 3.586983397836419*^9}, {
   3.5869848315109825`*^9, 3.586984831870983*^9}, 3.620157935170122*^9, 
   3.620268621175521*^9, {3.6712141011137357`*^9, 3.671214131645482*^9}, {
   3.6712436025981026`*^9, 3.67124361969308*^9}, {3.671243715206543*^9, 
   3.6712437156305676`*^9}, 3.6713793000921073`*^9},
 FontSize->12,
 FontWeight->"Bold"],

Cell["Derivation: Integration by parts", "Subsubsection",
 CellChangeTimes->{
  3.4941724567488375`*^9, 3.494172818179343*^9, {3.495045874395023*^9, 
   3.495045875835025*^9}, {3.4950462556855564`*^9, 3.495046257635559*^9}, 
   3.553373119004768*^9}],

Cell[TextData[{
 "Basis: ",
 Cell[BoxData[
  RowBox[{
   RowBox[{
    SubscriptBox["\[PartialD]", "x"], 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"a", "+", 
       RowBox[{"b", " ", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"]}], "\[Equal]", 
   FractionBox[
    RowBox[{"b", " ", "c", " ", "n", " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"a", "+", 
        RowBox[{"b", " ", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], 
      RowBox[{"n", "-", "1"}]]}], 
    SqrtBox[
     RowBox[{"1", "+", 
      RowBox[{
       SuperscriptBox["c", "2"], " ", 
       SuperscriptBox["x", "2"]}]}]]]}]], "Input",
  CellChangeTimes->{{3.586566688639513*^9, 3.586566713339547*^9}, {
    3.586567111720105*^9, 3.5865671350101376`*^9}, {3.586567519960676*^9, 
    3.5865675376207013`*^9}, 3.586567570720748*^9, {3.58656788675119*^9, 
    3.58656790809122*^9}, {3.586567943031269*^9, 3.5865680220613794`*^9}, {
    3.586568118811515*^9, 3.586568119461516*^9}, {3.5865681534515634`*^9, 
    3.5865681775415974`*^9}, {3.5865682092116413`*^9, 
    3.5865682434616895`*^9}, {3.5865682763917356`*^9, 3.5865683413518267`*^9}}]
}], "Subsubsection",
 CellChangeTimes->{{3.5813762364323072`*^9, 3.581376326802434*^9}, {
   3.5813826880473433`*^9, 3.5813826880473433`*^9}, {3.581720310829357*^9, 
   3.581720310829357*^9}, {3.581720366149435*^9, 3.581720366149435*^9}, {
   3.5817204073994923`*^9, 3.5817204073994923`*^9}, {3.581720524929657*^9, 
   3.581720524929657*^9}, {3.5864633734979143`*^9, 3.5864633862354326`*^9}, {
   3.586463493968087*^9, 3.586463494893089*^9}, {3.5864635381531506`*^9, 
   3.5864635393731527`*^9}, {3.586463685870864*^9, 3.586463685870864*^9}, {
   3.58646382210106*^9, 3.58646382210106*^9}, {3.5864732982240467`*^9, 
   3.5864732982240467`*^9}, {3.586485090653509*^9, 3.586485090653509*^9}, {
   3.586485180371138*^9, 3.586485180371138*^9}, {3.5864852213711967`*^9, 
   3.5864852213711967`*^9}, {3.586494187606468*^9, 3.5864942133777137`*^9}, {
   3.5865432242749014`*^9, 3.5865432242749014`*^9}, {3.5865463088192196`*^9, 
   3.586546312729225*^9}, {3.586546396929343*^9, 3.5865464175093718`*^9}, {
   3.5865464529294214`*^9, 3.5865464529294214`*^9}, {3.586546532519533*^9, 
   3.586546532519533*^9}, {3.5865468163899307`*^9, 3.5865468386399612`*^9}, {
   3.5865491636532164`*^9, 3.5865491636532164`*^9}, {3.5865492145532875`*^9, 
   3.5865492145532875`*^9}, {3.586551856136986*^9, 3.586551856136986*^9}, {
   3.5865607519912014`*^9, 3.5865607519912014`*^9}, {3.586563741525387*^9, 
   3.5865638039054737`*^9}, {3.5865678077210793`*^9, 3.586567824111102*^9}, 
   3.586568533272095*^9, {3.5865688286425085`*^9, 3.5865688286425085`*^9}, {
   3.586568997022744*^9, 3.586568997022744*^9}, {3.5865691763429956`*^9, 
   3.5865691763429956`*^9}, {3.5865833764756064`*^9, 
   3.5865833764756064`*^9}, {3.620501915857736*^9, 3.620501915857736*^9}, {
   3.6712128305470634`*^9, 3.6712128305470634`*^9}, {3.6713792999829073`*^9, 
   3.6713792999829073`*^9}, {3.6713794435607643`*^9, 
   3.6713794435607643`*^9}, {3.751308971135766*^9, 3.751308971813805*^9}, {
   3.7513090956018853`*^9, 3.7513090956018853`*^9}, {3.751309217850878*^9, 
   3.7513092178518777`*^9}, {3.7529665761147313`*^9, 
   3.7529665761147313`*^9}, {3.7529729315445423`*^9, 3.752972960451393*^9}}],

Cell[TextData[{
 "Rule: If  ",
 Cell[BoxData[
  RowBox[{
   RowBox[{"n", "\[Element]", 
    SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}], "\[And]", " ", 
   RowBox[{"m", "\[NotEqual]", 
    RowBox[{"-", "1"}]}]}]]],
 ", then"
}], "Subsubsection",
 CellDingbat->"\[FilledSmallSquare]",
 CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
   3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9, 
   3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9, 
   3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
   3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9, 
   3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9, 
   3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9}, 
   3.48070534977779*^9, {3.4928296953212276`*^9, 3.492829707041244*^9}, 
   3.4941724084687696`*^9, 3.4941724567488375`*^9, {3.4941737492506466`*^9, 
   3.4941737506706486`*^9}, {3.494173966810951*^9, 3.494174007671008*^9}, {
   3.4941741326011834`*^9, 3.4941741425911975`*^9}, {3.4941767936905165`*^9, 
   3.494176809630539*^9}, {3.4941773316412697`*^9, 3.494177333751273*^9}, {
   3.4941891756608777`*^9, 3.494189178765283*^9}, {3.4942004775317707`*^9, 
   3.494200477881771*^9}, {3.4950424099901724`*^9, 3.495042435550208*^9}, {
   3.495045573264601*^9, 3.4950455868746204`*^9}, {3.5533778848417416`*^9, 
   3.55337789792449*^9}, {3.5535355634443245`*^9, 3.5535355634443245`*^9}, {
   3.5549309146039114`*^9, 3.5549309146039114`*^9}, {3.554935398190188*^9, 
   3.554935398190188*^9}, {3.554935438010244*^9, 3.554935438010244*^9}, {
   3.555033842213949*^9, 3.555033842213949*^9}, {3.55519561866591*^9, 
   3.55519561866591*^9}, {3.5551973155382853`*^9, 3.5551973155382853`*^9}, {
   3.5552507987466173`*^9, 3.5552507987466173`*^9}, {3.555251708290615*^9, 
   3.555251708290615*^9}, {3.5863609285464163`*^9, 3.5863609299914184`*^9}, {
   3.5869832316511793`*^9, 3.5869832316511793`*^9}, {3.6712141258361497`*^9, 
   3.6712141258361497`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"\[Integral]", 
   RowBox[{
    SuperscriptBox["x", "m"], 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"a", "+", 
       RowBox[{"b", " ", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], 
    RowBox[{"\[DifferentialD]", 
     RowBox[{"x", "  ", "\[LongRightArrow]", "  ", 
      FractionBox[
       RowBox[{
        SuperscriptBox["x", 
         RowBox[{"m", "+", "1"}]], 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{"a", "+", 
           RowBox[{"b", " ", 
            RowBox[{"ArcSinh", "[", 
             RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"]}], 
       RowBox[{"m", "+", "1"}]]}]}]}]}], "-", 
  RowBox[{
   FractionBox[
    RowBox[{"b", " ", "c", " ", "n"}], 
    RowBox[{"m", "+", "1"}]], 
   RowBox[{"\[Integral]", 
    RowBox[{
     FractionBox[
      RowBox[{
       SuperscriptBox["x", 
        RowBox[{"m", "+", "1"}]], 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{"a", "+", 
          RowBox[{"b", " ", 
           RowBox[{"ArcSinh", "[", 
            RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], 
        RowBox[{"n", "-", "1"}]]}], 
      SqrtBox[
       RowBox[{"1", "+", 
        RowBox[{
         SuperscriptBox["c", "2"], " ", 
         SuperscriptBox["x", "2"]}]}]]], 
     RowBox[{"\[DifferentialD]", "x"}]}]}]}]}]], "Subsubtitle",
 CellDingbat->None,
 CellChangeTimes->{{3.4796579732027807`*^9, 3.479658002474872*^9}, {
   3.4796580599975853`*^9, 3.4796580609489536`*^9}, {3.479658295195784*^9, 
   3.47965829684816*^9}, 3.4796611938939075`*^9, 3.4796613924794593`*^9, {
   3.479661443342597*^9, 3.479661446647349*^9}, {3.479661576554146*^9, 
   3.479661589302477*^9}, 3.479661847553824*^9, {3.4796622294729967`*^9, 
   3.4796622450654173`*^9}, {3.479686720424531*^9, 3.4796867204345455`*^9}, {
   3.4796874646646957`*^9, 3.4796874745589232`*^9}, {3.492826573513727*^9, 
   3.492826578630536*^9}, {3.4928267070863624`*^9, 3.492826707460763*^9}, 
   3.4928267903497095`*^9, {3.492829799151373*^9, 3.4928299617216005`*^9}, {
   3.4940972077187414`*^9, 3.4940972347887793`*^9}, {3.49409966398218*^9, 
   3.494099664952181*^9}, {3.4940997156722527`*^9, 3.494099716112253*^9}, 
   3.4941724567488375`*^9, {3.4941727384192314`*^9, 3.494172760679263*^9}, {
   3.4941763955899596`*^9, 3.4941764290900064`*^9}, {3.4941764605500507`*^9, 
   3.4941764930400963`*^9}, {3.4941882372412295`*^9, 3.49418823769363*^9}, {
   3.4950421850198574`*^9, 3.4950422389399333`*^9}, {3.495045295774213*^9, 
   3.495045310274233*^9}, {3.4950453750643234`*^9, 3.4950453777743273`*^9}, {
   3.495045490884486*^9, 3.4950454957944927`*^9}, {3.553368718813157*^9, 
   3.553368809340116*^9}, {3.5549303571831307`*^9, 3.554930396443186*^9}, {
   3.554930437533243*^9, 3.5549304634232793`*^9}, 3.5549305254833665`*^9, {
   3.554930589243456*^9, 3.554930617493495*^9}, 3.5862788834076395`*^9, {
   3.5863608076262426`*^9, 3.586360820456261*^9}, {3.586360965441469*^9, 
   3.5863609683564734`*^9}, {3.5863610189915457`*^9, 
   3.5863610205265484`*^9}, {3.586361052396594*^9, 3.586361055186598*^9}, {
   3.671214134612652*^9, 3.6712141537697477`*^9}, {3.6712436273565187`*^9, 
   3.671243650445839*^9}, {3.6713793001233077`*^9, 3.6713793001389074`*^9}, 
   3.6713797721006584`*^9},
 TextAlignment->Center,
 FontSize->12,
 FontWeight->"Bold"],

Cell["Program code:", "Subsubsection",
 CellDingbat->"\[FilledSmallSquare]",
 CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
   3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9, 
   3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9, 
   3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
   3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9, 
   3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9, 
   3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9}, 
   3.4807050675119123`*^9, {3.492804314166378*^9, 3.4928043441496305`*^9}, {
   3.4928044532166224`*^9, 3.492804453513023*^9}, {3.492805162266266*^9, 
   3.492805165713872*^9}, 3.4941724567488375`*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"Int", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"x_", "^", "m_."}], "*", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{"a_.", "+", 
        RowBox[{"b_.", "*", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c_.", "*", "x_"}], "]"}]}]}], ")"}], "^", "n_"}]}], ",", 
    "x_Symbol"}], "]"}], " ", ":=", "\n", "  ", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"x", "^", 
      RowBox[{"(", 
       RowBox[{"m", "+", "1"}], ")"}]}], "*", 
     RowBox[{
      RowBox[{
       RowBox[{"(", 
        RowBox[{"a", "+", 
         RowBox[{"b", "*", 
          RowBox[{"ArcSinh", "[", 
           RowBox[{"c", "*", "x"}], "]"}]}]}], ")"}], "^", "n"}], "/", 
      RowBox[{"(", 
       RowBox[{"m", "+", "1"}], ")"}]}]}], " ", "-", " ", 
    "\[IndentingNewLine]", "  ", 
    RowBox[{"b", "*", "c", "*", 
     RowBox[{"n", "/", 
      RowBox[{"(", 
       RowBox[{"m", "+", "1"}], ")"}]}], "*", 
     RowBox[{"Int", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"x", "^", 
         RowBox[{"(", 
          RowBox[{"m", "+", "1"}], ")"}]}], "*", 
        RowBox[{
         RowBox[{
          RowBox[{"(", 
           RowBox[{"a", "+", 
            RowBox[{"b", "*", 
             RowBox[{"ArcSinh", "[", 
              RowBox[{"c", "*", "x"}], "]"}]}]}], ")"}], "^", 
          RowBox[{"(", 
           RowBox[{"n", "-", "1"}], ")"}]}], "/", 
         RowBox[{"Sqrt", "[", 
          RowBox[{"1", "+", 
           RowBox[{
            RowBox[{"c", "^", "2"}], "*", 
            RowBox[{"x", "^", "2"}]}]}], "]"}]}]}], ",", "x"}], "]"}]}]}], 
   " ", "/;", "\n", 
   RowBox[{
    RowBox[{"FreeQ", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"a", ",", "b", ",", "c"}], "}"}], ",", "x"}], "]"}], " ", "&&",
     " ", 
    RowBox[{"IGtQ", "[", 
     RowBox[{"m", ",", "0"}], "]"}], " ", "&&", " ", 
    RowBox[{"GtQ", "[", 
     RowBox[{"n", ",", "0"}], "]"}]}]}]}]], "Code",
 CellChangeTimes->{{3.494097279728842*^9, 3.494097309778884*^9}, {
   3.494099665582182*^9, 3.4940996672021847`*^9}, {3.4940997193022575`*^9, 
   3.494099719662258*^9}, 3.4941724567488375`*^9, 3.494172717389202*^9, {
   3.4941763709899254`*^9, 3.49417638178994*^9}, {3.4950424525902324`*^9, 
   3.4950425131303167`*^9}, {3.495045395254352*^9, 3.4950455421745577`*^9}, {
   3.495045613344657*^9, 3.495045623144671*^9}, 3.495046501655901*^9, 
   3.495047583047415*^9, 3.4950476263774757`*^9, 3.553373242560835*^9, {
   3.5533733015562096`*^9, 3.5533733049994063`*^9}, 3.553377717427166*^9, {
   3.553377865647644*^9, 3.553377874009122*^9}, {3.553402502413335*^9, 
   3.5534025332833786`*^9}, {3.5534035146147523`*^9, 3.553403612484889*^9}, {
   3.553468670048935*^9, 3.5534686745161796`*^9}, {3.5534688089220047`*^9, 
   3.55346883384204*^9}, 3.5535646024048843`*^9, 3.5549307021136136`*^9, 
   3.5549307778237195`*^9, 3.5549308447738132`*^9, {3.55493200677544*^9, 
   3.5549320070354404`*^9}, {3.554935254679987*^9, 3.5549352848900294`*^9}, 
   3.5550338459439545`*^9, 3.5551972087981358`*^9, 3.555250732602502*^9, {
   3.555250768420164*^9, 3.5552508159846478`*^9}, {3.555251631928481*^9, 
   3.555251662098934*^9}, 3.5552517425482755`*^9, {3.5552518183644085`*^9, 
   3.555251824479619*^9}, 3.555251935208614*^9, 3.5552526411566534`*^9, 
   3.586211846591567*^9, 3.5862122402446394`*^9, 3.586278907072881*^9, {
   3.586360835011282*^9, 3.586360856206312*^9}, {3.5863609016113777`*^9, 
   3.586360902591379*^9}, {3.586360941621435*^9, 3.5863609420514355`*^9}, {
   3.586360972276479*^9, 3.5863609760464845`*^9}, {3.5863610239265532`*^9, 
   3.5863610596966047`*^9}, 3.586363979408296*^9, {3.5869773826555023`*^9, 
   3.58697742254056*^9}, {3.5869831868086147`*^9, 3.5869831972936296`*^9}, 
   3.586983328233819*^9, 3.5869833634113693`*^9, 3.5869848057009454`*^9, {
   3.6712142164853344`*^9, 3.6712142573756733`*^9}, {3.671243661104449*^9, 
   3.6712436847288*^9}, {3.671244057884143*^9, 3.6712440756971617`*^9}, 
   3.6712441171995363`*^9, {3.6713793001389074`*^9, 3.6713793001545076`*^9}, 
   3.6713798314591618`*^9, {3.7152179517282505`*^9, 3.715217957569585*^9}},
 Background->GrayLevel[0.85]],

Cell["", "Subsubsection",
 CellDingbat->None,
 CellChangeTimes->{3.4796643211106243`*^9, 3.4941724567488375`*^9}]
}, Closed]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\t", 
  RowBox[{Cell[TextData[StyleBox["2.",
    FontFamily->"Arial"]], "None"], "  ", 
   RowBox[{"\[Integral]", 
    RowBox[{
     SuperscriptBox["x", "m"], " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"a", "+", 
        RowBox[{"b", " ", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], 
     RowBox[{"\[DifferentialD]", "x"}], "  ", 
     StyleBox["when",
      FontFamily->"Arial",
      FontWeight->"Plain"], 
     StyleBox["  ",
      FontFamily->"Arial",
      FontWeight->"Plain"], Cell[TextData[Cell[BoxData[
      RowBox[{
       RowBox[{"m", "\[Element]", 
        SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}], "\[And]", " ", 
       RowBox[{"n", "<", 
        RowBox[{"-", "1"}]}]}]]]], "None"]}]}]}]}]], "Subsubtitle",
 CellDingbat->None,
 CellChangeTimes->{
  3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
   3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9, 
   3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9, 
   3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9}, 
   3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9}, 
   3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9, 
   3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
   3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9, 
   3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
   3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9, 
   3.519247079685614*^9, {3.5193208582062006`*^9, 3.5193208612170057`*^9}, 
   3.5193325694253187`*^9, {3.5193415004828687`*^9, 3.5193415113404875`*^9}, {
   3.5193513965602303`*^9, 3.519351397420232*^9}, {3.5194037839416766`*^9, 
   3.5194037847117205`*^9}, 3.52105258275843*^9, 3.5210531741726685`*^9, {
   3.521057461672199*^9, 3.5210574760242243`*^9}, {3.521059881564049*^9, 
   3.521059886088057*^9}, {3.5213902158895197`*^9, 3.521390217543123*^9}, {
   3.521390827878595*^9, 3.521390829376197*^9}, {3.5214688792561245`*^9, 
   3.521468879443325*^9}, {3.523320201951167*^9, 3.523320202247567*^9}, {
   3.5288596764894824`*^9, 3.5288596768094826`*^9}, {3.529196266260353*^9, 
   3.5291962665099535`*^9}, {3.5291997050223927`*^9, 
   3.5291997052563934`*^9}, {3.529201346457276*^9, 3.529201347252877*^9}, {
   3.529285041073242*^9, 3.5292850412632427`*^9}, {3.529285215443486*^9, 
   3.529285215443486*^9}, {3.5295115356999426`*^9, 3.5295115433443794`*^9}, {
   3.529521412127842*^9, 3.529521414647986*^9}, {3.529529429975619*^9, 
   3.529529432955224*^9}, 3.5340074894011116`*^9, 3.5415537711400824`*^9, {
   3.5415538454742126`*^9, 3.54155384951462*^9}, {3.5417297197063265`*^9, 
   3.5417297252443366`*^9}, {3.546297494083555*^9, 3.5462974982435613`*^9}, {
   3.5462989134855423`*^9, 3.5462989153655453`*^9}, 3.548544146508506*^9, 
   3.5488738855784535`*^9, {3.5505953688729563`*^9, 3.5505953726861744`*^9}, {
   3.550619508681926*^9, 3.5506195174954305`*^9}, {3.5508023692987375`*^9, 
   3.550802389570897*^9}, {3.550802668197833*^9, 3.5508026783084116`*^9}, {
   3.5508027313334446`*^9, 3.550802732037485*^9}, {3.5508103505662394`*^9, 
   3.5508103516062994`*^9}, {3.5511121277291827`*^9, 3.551112128241212*^9}, {
   3.552151135665351*^9, 3.552151135883752*^9}, 3.5521516632426777`*^9, 
   3.553532228232108*^9, {3.553534887396204*^9, 3.553534918930008*^9}, {
   3.5535356451416683`*^9, 3.553535645438069*^9}, 3.5535368896088223`*^9, {
   3.55353837272647*^9, 3.55353837272647*^9}, {3.553538438366562*^9, 
   3.5535384385765624`*^9}, {3.554920815170966*^9, 3.5549208154109664`*^9}, {
   3.5549462357353606`*^9, 3.554946259655394*^9}, 3.555093906105858*^9, {
   3.5550975426209493`*^9, 3.5550975449709525`*^9}, {3.5550976100110435`*^9, 
   3.555097611001045*^9}, {3.5550980172416134`*^9, 3.5550980172416134`*^9}, {
   3.5551922050464916`*^9, 3.5551922142265043`*^9}, {3.5551987008602247`*^9, 
   3.5551987011102257`*^9}, {3.5551997319916687`*^9, 
   3.5551997345716724`*^9}, {3.555199780981737*^9, 3.555199781151737*^9}, {
   3.555254043287116*^9, 3.555254043739517*^9}, 3.5853498576010413`*^9, {
   3.585350705892229*^9, 3.5853507075322313`*^9}, {3.5853507571323004`*^9, 
   3.5853507666123133`*^9}, 3.5861901476630435`*^9, 3.5863642193134413`*^9, {
   3.586819819882893*^9, 3.5868198310029087`*^9}, {3.5869679653204327`*^9, 
   3.5869679653204327`*^9}, 3.5869680286455235`*^9, 3.5869689554218593`*^9, {
   3.586984855221017*^9, 3.586984858388521*^9}, {3.5869858373449306`*^9, 
   3.5869858404699354`*^9}, 3.586988724746501*^9, {3.5869915440504484`*^9, 
   3.5869915456404505`*^9}, 3.6201579365051985`*^9, 3.6202686228796186`*^9, {
   3.62026989570142*^9, 3.6202698995636406`*^9}, 3.671214870310731*^9, {
   3.671215034915146*^9, 3.671215050265024*^9}, {3.6712159111702647`*^9, 
   3.6712159127903576`*^9}, {3.67121624816654*^9, 3.6712162643834677`*^9}, {
   3.6712437233630095`*^9, 3.6712437235360193`*^9}, 3.671379300170108*^9},
 FontSize->12,
 FontWeight->"Bold"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\t\t", 
  RowBox[{Cell[TextData[StyleBox["1:",
    FontFamily->"Arial",
    FontColor->RGBColor[1, 0, 0]]], "None"], "  ", 
   RowBox[{"\[Integral]", 
    RowBox[{
     SuperscriptBox["x", "m"], 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"a", "+", 
        RowBox[{"b", " ", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], 
     RowBox[{"\[DifferentialD]", "x"}], "  ", 
     StyleBox["when",
      FontFamily->"Arial",
      FontWeight->"Plain"], 
     StyleBox["  ",
      FontFamily->"Arial",
      FontWeight->"Plain"], Cell[TextData[Cell[BoxData[
      RowBox[{
       RowBox[{"m", "\[Element]", 
        SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}], "\[And]", " ", 
       RowBox[{
        RowBox[{"-", "2"}], "\[LessEqual]", "n", "<", 
        RowBox[{"-", "1"}]}]}]]]], "None"]}]}]}]}]], "Subsubtitle",
 CellDingbat->None,
 CellChangeTimes->{
  3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
   3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9, 
   3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9, 
   3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9}, 
   3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9}, 
   3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9, 
   3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
   3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9, 
   3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
   3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9, 
   3.519247079685614*^9, {3.5193208582062006`*^9, 3.5193208612170057`*^9}, 
   3.5193325694253187`*^9, {3.5193422443984776`*^9, 3.5193422447260776`*^9}, 
   3.5193424488212357`*^9, {3.5193434708254333`*^9, 3.519343473103037*^9}, {
   3.5193435097631016`*^9, 3.51934353169674*^9}, {3.519345739319023*^9, 
   3.519345739599823*^9}, 3.5193462601259375`*^9, {3.5193475061060295`*^9, 
   3.5193475233908596`*^9}, {3.519351391880224*^9, 3.5193513931402254`*^9}, {
   3.519403773021052*^9, 3.5194037798564425`*^9}, 3.5194106793250647`*^9, {
   3.519537578341393*^9, 3.5195375792305946`*^9}, {3.5195376277778797`*^9, 
   3.51953767927357*^9}, {3.5197586260636144`*^9, 3.5197586260636144`*^9}, {
   3.51978053295651*^9, 3.519780542862528*^9}, {3.5197806526087203`*^9, 
   3.5197806657595434`*^9}, {3.5197807490168896`*^9, 3.5197807642581167`*^9}, 
   3.5197809004619555`*^9, {3.519782653514635*^9, 3.5197826623286505`*^9}, {
   3.5200207810164795`*^9, 3.520020785046485*^9}, {3.5213126833374643`*^9, 
   3.5213126833374643`*^9}, {3.521328235411002*^9, 3.521328235411002*^9}, {
   3.523315567893022*^9, 3.523315567893022*^9}, {3.5233157569332867`*^9, 
   3.5233157613032923`*^9}, {3.5323023198133526`*^9, 3.532302355723403*^9}, {
   3.5323026417638035`*^9, 3.5323026417638035`*^9}, {3.5323026980138817`*^9, 
   3.5323026980138817`*^9}, {3.532636287104328*^9, 3.532636287104328*^9}, {
   3.5330803686035347`*^9, 3.533080368863535*^9}, {3.533248909289961*^9, 
   3.5332489110299635`*^9}, {3.534962469565694*^9, 3.5349624910757236`*^9}, {
   3.5349625224057674`*^9, 3.534962522655768*^9}, {3.534965265519608*^9, 
   3.534965265519608*^9}, {3.5349668288168063`*^9, 3.5349668292668066`*^9}, {
   3.5349747358481646`*^9, 3.5349747358481646`*^9}, {3.534975457949176*^9, 
   3.534975457949176*^9}, {3.5368633963532934`*^9, 3.536863396571694*^9}, {
   3.541644322511304*^9, 3.5416443577513533`*^9}, {3.5416458269234104`*^9, 
   3.541645839633428*^9}, {3.5416460312236967`*^9, 3.541646031483697*^9}, 
   3.541646227783972*^9, {3.541647080335165*^9, 3.5416471077052035`*^9}, {
   3.541648997607849*^9, 3.5416489978278494`*^9}, 3.541649088407976*^9, {
   3.5417848711596775`*^9, 3.541784902429721*^9}, {3.541786145331461*^9, 
   3.5417861455914617`*^9}, {3.5417870037166634`*^9, 3.5417870039366636`*^9}, 
   3.5462979620242105`*^9, {3.546298264094633*^9, 3.546298265344635*^9}, {
   3.546299000235664*^9, 3.546299001505666*^9}, {3.546315119909564*^9, 
   3.5463151267659564`*^9}, {3.547227356319705*^9, 3.547227356319705*^9}, 
   3.547918559331044*^9, {3.547918610170952*^9, 3.5479186304411116`*^9}, 
   3.548537755517557*^9, 3.5485441629685287`*^9, 3.5485517520154133`*^9, {
   3.5488740727887154`*^9, 3.5488740727887154`*^9}, {3.548874206618903*^9, 
   3.548874206808903*^9}, 3.548877100795455*^9, 3.550596464087599*^9, {
   3.5505965767870445`*^9, 3.5505965767870445`*^9}, 3.5505966202465305`*^9, {
   3.5506039138305197`*^9, 3.55060391400453*^9}, {3.5506040039986773`*^9, 
   3.550604005776779*^9}, {3.5506178888272758`*^9, 3.5506178900273447`*^9}, {
   3.550770598144562*^9, 3.550770659629079*^9}, {3.5507707252908344`*^9, 
   3.5507707474461017`*^9}, 3.5507880023630266`*^9, {3.5508017696214375`*^9, 
   3.5508017788269644`*^9}, {3.5508018116158395`*^9, 3.5508018116158395`*^9}, 
   3.5508018976437597`*^9, {3.5508021384015307`*^9, 3.550802155115487*^9}, {
   3.5508022151019173`*^9, 3.5508022151019173`*^9}, {3.550802487106476*^9, 
   3.5508025179152374`*^9}, {3.5508029261175857`*^9, 
   3.5508029342300496`*^9}, {3.5521511708590136`*^9, 3.5521511712334137`*^9}, 
   3.552151666269083*^9, {3.5535324250863676`*^9, 3.553532441643315*^9}, {
   3.553532476791325*^9, 3.553532477502366*^9}, {3.55353264209878*^9, 
   3.553532646010004*^9}, {3.553534466427126*^9, 3.553534466698141*^9}, {
   3.5535349578862357`*^9, 3.553534958094248*^9}, {3.5535350200317903`*^9, 
   3.553535041770034*^9}, 3.5549205494705944`*^9, {3.5549324030659947`*^9, 
   3.5549324032759953`*^9}, 3.5550157162103004`*^9, {3.5550157642303677`*^9, 
   3.555015796750414*^9}, {3.555019936276209*^9, 3.5550199422962174`*^9}, {
   3.5550213462681828`*^9, 3.555021355548196*^9}, {3.5550287787068605`*^9, 
   3.55502881422691*^9}, 3.555176026583721*^9, 3.5551766637846127`*^9, 
   3.555192223496517*^9, {3.5551926299214964`*^9, 3.5551926305114975`*^9}, 
   3.555208220168639*^9, {3.555210053651206*^9, 3.555210053651206*^9}, 
   3.5853498576710415`*^9, 3.585350798122358*^9, {3.58535096386259*^9, 
   3.585350964632591*^9}, 3.586190147753044*^9, 3.586364222488446*^9, 
   3.5868205378638983`*^9, {3.586821963265894*^9, 3.58682197462591*^9}, {
   3.586968031565528*^9, 3.586968035420533*^9}, 3.5869689632818704`*^9, 
   3.5869915465504518`*^9, 3.620157937087232*^9, 3.620268623701666*^9, {
   3.6712150381913333`*^9, 3.6712150386683607`*^9}, 3.671215914129434*^9, {
   3.6712160442658777`*^9, 3.6712160442658777`*^9}, {3.671216271660884*^9, 
   3.671216271660884*^9}, 3.6713793001857076`*^9},
 FontSize->12,
 FontWeight->"Bold"],

Cell["\<\
Derivation: Integration by parts and integration by substitution\
\>", "Subsubsection",
 CellChangeTimes->{
  3.4941724567488375`*^9, 3.494172818179343*^9, {3.495045874395023*^9, 
   3.495045875835025*^9}, {3.4950462556855564`*^9, 3.495046257635559*^9}, 
   3.553373119004768*^9, {3.5869854712344036`*^9, 3.586985485424424*^9}, {
   3.671214515748451*^9, 3.671214518205592*^9}}],

Cell[TextData[{
 "Basis: ",
 Cell[BoxData[
  RowBox[{
   FractionBox[
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"a", "+", 
       RowBox[{"b", " ", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], 
    SqrtBox[
     RowBox[{"1", "+", 
      RowBox[{
       SuperscriptBox["c", "2"], " ", 
       SuperscriptBox["x", "2"]}]}]]], "\[Equal]", 
   RowBox[{
    SubscriptBox["\[PartialD]", "x"], 
    FractionBox[
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"a", "+", 
        RowBox[{"b", " ", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], 
      RowBox[{"n", "+", "1"}]], 
     RowBox[{"b", " ", "c", " ", 
      RowBox[{"(", 
       RowBox[{"n", "+", "1"}], ")"}]}]]}]}]],
  CellChangeTimes->{{3.5869835620991554`*^9, 3.58698356510916*^9}, {
   3.5869836080692215`*^9, 3.5869836267667484`*^9}}]
}], "Subsubsection",
 CellChangeTimes->{
  3.4941724567488375`*^9, 3.494172818179343*^9, {3.495045874395023*^9, 
   3.495045875835025*^9}, {3.4950462556855564`*^9, 3.495046257635559*^9}, 
   3.553373119004768*^9, {3.586983544896631*^9, 3.5869835463566327`*^9}, 
   3.586983632146756*^9, {3.6713793002013073`*^9, 3.6713793002169075`*^9}, {
   3.6713797733642607`*^9, 3.6713797733642607`*^9}}],

Cell[TextData[{
 "Basis: ",
 Cell[BoxData[
  RowBox[{
   RowBox[{
    SubscriptBox["\[PartialD]", "x"], 
    RowBox[{"(", 
     RowBox[{
      SuperscriptBox["x", "m"], " ", 
      SqrtBox[
       RowBox[{"1", "+", 
        RowBox[{
         SuperscriptBox["c", "2"], " ", 
         SuperscriptBox["x", "2"]}]}]]}], ")"}]}], "\[Equal]", 
   FractionBox[
    RowBox[{
     SuperscriptBox["x", 
      RowBox[{"m", "-", "1"}]], " ", 
     RowBox[{"(", 
      RowBox[{"m", "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"m", "+", "1"}], ")"}], " ", 
        SuperscriptBox["c", "2"], " ", 
        SuperscriptBox["x", "2"]}]}], ")"}]}], 
    SqrtBox[
     RowBox[{"1", "+", 
      RowBox[{
       SuperscriptBox["c", "2"], " ", 
       SuperscriptBox["x", "2"]}]}]]]}]],
  CellChangeTimes->{{3.5869835620991554`*^9, 3.58698356510916*^9}, {
   3.5869836080692215`*^9, 3.5869836267667484`*^9}}]
}], "Subsubsection",
 CellChangeTimes->{
  3.4941724567488375`*^9, 3.494172818179343*^9, {3.495045874395023*^9, 
   3.495045875835025*^9}, {3.4950462556855564`*^9, 3.495046257635559*^9}, 
   3.553373119004768*^9, {3.586983544896631*^9, 3.5869835463566327`*^9}, 
   3.586983632146756*^9, {3.6713793002013073`*^9, 3.6713793002169075`*^9}, {
   3.6713797733642607`*^9, 3.6713797733642607`*^9}, {3.751310511837889*^9, 
   3.7513105412835736`*^9}, {3.7513105846280527`*^9, 3.7513105846280527`*^9}}],

Cell[TextData[{
 "Basis: ",
 Cell[BoxData[
  RowBox[{
   FractionBox[
    RowBox[{"F", "[", "x", "]"}], 
    SqrtBox[
     RowBox[{"1", "+", 
      RowBox[{
       SuperscriptBox["c", "2"], " ", 
       SuperscriptBox["x", "2"]}]}]]], "\[Equal]", 
   RowBox[{
    FractionBox["1", 
     RowBox[{"b", " ", "c"}]], " ", 
    RowBox[{"Subst", "[", 
     RowBox[{
      RowBox[{"F", "[", 
       FractionBox[
        RowBox[{"Sinh", "[", 
         RowBox[{
          RowBox[{"-", 
           FractionBox["a", "b"]}], "+", 
          FractionBox["x", "b"]}], "]"}], "c"], "]"}], ",", "x", ",", 
      RowBox[{"a", "+", 
       RowBox[{"b", " ", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", " ", "x"}], "]"}]}]}]}], "]"}], " ", 
    RowBox[{
     SubscriptBox["\[PartialD]", "x"], 
     RowBox[{"(", 
      RowBox[{"a", "+", 
       RowBox[{"b", " ", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}]}]}]}]], "Input",
  CellChangeTimes->{{3.586566688639513*^9, 3.586566713339547*^9}, {
    3.586567111720105*^9, 3.5865671350101376`*^9}, {3.586567519960676*^9, 
    3.5865675376207013`*^9}, 3.586567570720748*^9, {3.58656788675119*^9, 
    3.58656790809122*^9}, {3.586567943031269*^9, 3.5865680220613794`*^9}, {
    3.586568118811515*^9, 3.586568119461516*^9}, {3.5865681534515634`*^9, 
    3.5865681775415974`*^9}, {3.5865682092116413`*^9, 
    3.5865682434616895`*^9}, {3.5865682763917356`*^9, 3.5865683413518267`*^9}}]
}], "Subsubsection",
 CellChangeTimes->{{3.5813762364323072`*^9, 3.581376326802434*^9}, {
   3.5813826880473433`*^9, 3.5813826880473433`*^9}, {3.581720310829357*^9, 
   3.581720310829357*^9}, {3.581720366149435*^9, 3.581720366149435*^9}, {
   3.5817204073994923`*^9, 3.5817204073994923`*^9}, {3.581720524929657*^9, 
   3.581720524929657*^9}, {3.5864633734979143`*^9, 3.5864633862354326`*^9}, {
   3.586463493968087*^9, 3.586463494893089*^9}, {3.5864635381531506`*^9, 
   3.5864635393731527`*^9}, {3.586463685870864*^9, 3.586463685870864*^9}, {
   3.58646382210106*^9, 3.58646382210106*^9}, {3.5864732982240467`*^9, 
   3.5864732982240467`*^9}, {3.586485090653509*^9, 3.586485090653509*^9}, {
   3.586485180371138*^9, 3.586485180371138*^9}, {3.5864852213711967`*^9, 
   3.5864852213711967`*^9}, {3.586494187606468*^9, 3.5864942133777137`*^9}, {
   3.5865432242749014`*^9, 3.5865432242749014`*^9}, {3.5865463088192196`*^9, 
   3.586546312729225*^9}, {3.586546396929343*^9, 3.5865464175093718`*^9}, {
   3.5865464529294214`*^9, 3.5865464529294214`*^9}, {3.586546532519533*^9, 
   3.586546532519533*^9}, {3.5865468163899307`*^9, 3.5865468386399612`*^9}, {
   3.5865491636532164`*^9, 3.5865491636532164`*^9}, {3.5865492145532875`*^9, 
   3.5865492145532875`*^9}, {3.586551856136986*^9, 3.586551856136986*^9}, {
   3.5865607519912014`*^9, 3.5865607519912014`*^9}, {3.586563741525387*^9, 
   3.5865638039054737`*^9}, {3.5865678077210793`*^9, 3.586567824111102*^9}, 
   3.586568533272095*^9, {3.5865688286425085`*^9, 3.5865688286425085`*^9}, {
   3.586568997022744*^9, 3.586568997022744*^9}, {3.5865691763429956`*^9, 
   3.5865691763429956`*^9}, {3.5865833764756064`*^9, 
   3.5865833764756064`*^9}, {3.5868212984549627`*^9, 
   3.5868212984549627`*^9}, {3.6713793002325077`*^9, 
   3.6713793002325077`*^9}, {3.6713797754858637`*^9, 
   3.6713797754858637`*^9}, {3.6713799595561867`*^9, 
   3.6713799595561867`*^9}, {3.7513089824524136`*^9, 
   3.7513089847865467`*^9}, {3.7513094297549973`*^9, 
   3.7513094297549973`*^9}, {3.7513096238931017`*^9, 
   3.7513096238931017`*^9}, {3.7529688610630407`*^9, 
   3.7529688610630407`*^9}, {3.752969014988511*^9, 3.752969014988511*^9}, {
   3.7529730714923882`*^9, 3.752973096421232*^9}, {3.7529732577723155`*^9, 
   3.7529732577723155`*^9}, {3.753455555556596*^9, 3.753455555556596*^9}}],

Cell[TextData[{
 "Basis:",
 " If  ",
 Cell[BoxData[
  RowBox[{"m", "\[Element]", "\[DoubleStruckCapitalZ]"}]]],
 ", then",
 " ",
 Cell[BoxData[Cell[TextData[Cell[BoxData[
   RowBox[{
    FractionBox[
     RowBox[{
      SuperscriptBox["x", 
       RowBox[{"m", "-", "1"}]], 
      RowBox[{"(", 
       RowBox[{"m", "+", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{"m", "+", "1"}], ")"}], " ", 
         SuperscriptBox["c", "2"], " ", 
         SuperscriptBox["x", "2"]}]}], ")"}]}], 
     SqrtBox[
      RowBox[{"1", "+", 
       RowBox[{
        SuperscriptBox["c", "2"], " ", 
        SuperscriptBox["x", "2"]}]}]]], "\[Equal]", 
    RowBox[{
     FractionBox["1", 
      RowBox[{"b", " ", 
       SuperscriptBox["c", "m"]}]], " ", 
     RowBox[{"Subst", "[", 
      RowBox[{
       RowBox[{
        SuperscriptBox[
         RowBox[{"Sinh", "[", 
          RowBox[{
           RowBox[{"-", 
            FractionBox["a", "b"]}], "+", 
           FractionBox["x", "b"]}], "]"}], 
         RowBox[{"m", "-", "1"}]], 
        RowBox[{"(", 
         RowBox[{"m", "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"m", "+", "1"}], ")"}], " ", 
           SuperscriptBox[
            RowBox[{"Sinh", "[", 
             RowBox[{
              RowBox[{"-", 
               FractionBox["a", "b"]}], "+", 
              FractionBox["x", "b"]}], "]"}], "2"]}]}], ")"}]}], ",", "x", 
       ",", 
       RowBox[{"a", "+", 
        RowBox[{"b", " ", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c", " ", "x"}], "]"}]}]}]}], "]"}], 
     RowBox[{
      SubscriptBox["\[PartialD]", "x"], 
      RowBox[{"(", 
       RowBox[{"a", "+", 
        RowBox[{"b", " ", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}]}]}]}]]]], "Subsubsection",
   CellChangeTimes->{
    3.4941724567488375`*^9, {3.494172818179343*^9, 3.494172835289367*^9}, 
     3.4941728817394323`*^9, {3.4941732517099504`*^9, 
     3.4941732592199607`*^9}}]]]
}], "Subsubsection",
 CellChangeTimes->{
  3.4941724567488375`*^9, {3.494172818179343*^9, 3.494172835289367*^9}, 
   3.4941728817394323`*^9, {3.4941732517099504`*^9, 3.4941732592199607`*^9}, {
   3.4941867403328547`*^9, 3.494186750597673*^9}, {3.494188482910461*^9, 
   3.494188485702866*^9}, 3.494188591549052*^9, {3.49418864176554*^9, 
   3.49418864750635*^9}, {3.4941887057880526`*^9, 3.494188733883702*^9}, {
   3.494189069767892*^9, 3.4941891152419715`*^9}, {3.494198042823061*^9, 
   3.494198045428265*^9}, {3.494198409922906*^9, 3.4941984537277822`*^9}, 
   3.494198500746265*^9, {3.494198552556757*^9, 3.4941985875008183`*^9}, {
   3.4941986433645163`*^9, 3.4941986981050124`*^9}, {3.494198728727866*^9, 
   3.4941987591167192`*^9}, {3.5537064027639275`*^9, 
   3.5537064046439295`*^9}, {3.554908854828027*^9, 3.554908868042783*^9}, {
   3.5549109334971294`*^9, 3.5549109334971294`*^9}, {3.5549110429772825`*^9, 
   3.5549110441072845`*^9}, {3.5549110833573394`*^9, 
   3.5549111307074056`*^9}, {3.5549112286175427`*^9, 3.554911238587557*^9}, {
   3.554911286387624*^9, 3.5549112873876247`*^9}, {3.5549113838077602`*^9, 
   3.5549114191978097`*^9}, {3.5549115160579453`*^9, 3.554911528097962*^9}, {
   3.554911828468383*^9, 3.5549118320683875`*^9}, {3.5549119348885317`*^9, 
   3.5549119841686*^9}, {3.5549120405586796`*^9, 3.5549120483786907`*^9}, {
   3.5549121415488205`*^9, 3.5549121415488205`*^9}, {3.554912225098938*^9, 
   3.554912225098938*^9}, {3.5549123761691494`*^9, 3.5549123761691494`*^9}, {
   3.5549125249193573`*^9, 3.5549125249193573`*^9}, {3.5549142618417892`*^9, 
   3.5549142792618136`*^9}, {3.555029745588214*^9, 3.5550297758782563`*^9}, {
   3.5550298530083647`*^9, 3.5550298599283743`*^9}, {3.555029930748473*^9, 
   3.5550300081485815`*^9}, {3.55503004292863*^9, 3.5550301082687216`*^9}, 
   3.5550303912391176`*^9, {3.5550305620093565`*^9, 3.555030571969371*^9}, {
   3.555176973205046*^9, 3.555177072375185*^9}, {3.5552084279289303`*^9, 
   3.5552084279289303`*^9}, {3.555208512159048*^9, 3.555208517819056*^9}, {
   3.5552085716991315`*^9, 3.555208579239142*^9}, {3.5552086108691864`*^9, 
   3.555208631199215*^9}, {3.555209140669928*^9, 3.555209140669928*^9}, {
   3.5552093329101973`*^9, 3.55520936353024*^9}, {3.55520954190049*^9, 
   3.55520954190049*^9}, {3.5552095751005363`*^9, 3.5552095751005363`*^9}, {
   3.5853498576810412`*^9, 3.5853498577110415`*^9}, {3.585349974151204*^9, 
   3.585349974151204*^9}, {3.5861901477630444`*^9, 3.586190147793044*^9}, {
   3.5861905987211757`*^9, 3.5861906045911837`*^9}, {3.586191093379369*^9, 
   3.586191093379369*^9}, {3.586814027174783*^9, 3.586814032484791*^9}, {
   3.5868210121745625`*^9, 3.5868210151345663`*^9}, {3.5868210688346415`*^9, 
   3.5868210688346415`*^9}, {3.5868214466051702`*^9, 
   3.5868215079352565`*^9}, {3.6713793004197083`*^9, 
   3.6713793004509077`*^9}, {3.671379776546666*^9, 3.671379776546666*^9}, {
   3.671380050046549*^9, 3.671380050046549*^9}, {3.671380397381767*^9, 
   3.671380397381767*^9}, {3.671380516303496*^9, 3.671380516303496*^9}, {
   3.7513089858596087`*^9, 3.7513089863676376`*^9}, {3.7513095841798306`*^9, 
   3.7513095841808305`*^9}, {3.7513107868766203`*^9, 
   3.7513107868766203`*^9}, {3.7529688643390465`*^9, 
   3.7529688643390465`*^9}, {3.7529690956406527`*^9, 
   3.7529690956406527`*^9}, {3.7529693709811363`*^9, 
   3.7529693709811363`*^9}, {3.7529731000248384`*^9, 
   3.7529731000248384`*^9}, {3.7529733921665516`*^9, 
   3.7529733921665516`*^9}, {3.752973467077883*^9, 3.752973467077883*^9}, {
   3.752973554781237*^9, 3.752973554781237*^9}, {3.7534557008552513`*^9, 
   3.7534557008552513`*^9}}],

Cell["\<\
Note: Although not essential, by switching to the hyperbolic trig world this \
rule saves numerous steps and results in more compact antiderivatives.\
\>", "Subsubsection",
 CellDingbat->"\[FilledSmallSquare]",
 CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
   3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9, 
   3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9, 
   3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
   3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9, 
   3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9, 
   3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9}, 
   3.48070534977779*^9, {3.4928296953212276`*^9, 3.492829707041244*^9}, 
   3.4941724084687696`*^9, 3.4941724567488375`*^9, {3.4941737492506466`*^9, 
   3.4941737506706486`*^9}, {3.494173966810951*^9, 3.494174007671008*^9}, {
   3.4941741326011834`*^9, 3.4941741425911975`*^9}, {3.4941767936905165`*^9, 
   3.494176809630539*^9}, {3.494983386725746*^9, 3.4949833909065533`*^9}, 
   3.494983497719941*^9, {3.4949854524501743`*^9, 3.4949854564749813`*^9}, {
   3.4949859589098663`*^9, 3.4949859602514687`*^9}, {3.5535350662944365`*^9, 
   3.5535350662944365`*^9}, {3.5550157834103947`*^9, 
   3.5550157834103947`*^9}, {3.5550199816562724`*^9, 3.555019982786274*^9}, {
   3.555021364078208*^9, 3.555021364078208*^9}, {3.5550301305387526`*^9, 
   3.5550301305387526`*^9}, {3.555209785640831*^9, 3.555209785640831*^9}, {
   3.5853509691925974`*^9, 3.5853509701425986`*^9}, {3.5868217208155546`*^9, 
   3.5868219041958113`*^9}, {3.586822524186679*^9, 3.5868225502067156`*^9}, {
   3.671380058517364*^9, 3.671380060467367*^9}}],

Cell[TextData[{
 "Rule: If  ",
 Cell[BoxData[
  RowBox[{
   RowBox[{"m", "\[Element]", 
    SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}], "\[And]", " ", 
   RowBox[{
    RowBox[{"-", "2"}], "\[LessEqual]", "n", "<", 
    RowBox[{"-", "1"}]}]}]]],
 ", then"
}], "Subsubsection",
 CellDingbat->"\[FilledSmallSquare]",
 CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
   3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9, 
   3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9, 
   3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
   3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9, 
   3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9, 
   3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9}, 
   3.48070534977779*^9, {3.4928296953212276`*^9, 3.492829707041244*^9}, 
   3.4941724084687696`*^9, 3.4941724567488375`*^9, {3.4941737492506466`*^9, 
   3.4941737506706486`*^9}, {3.494173966810951*^9, 3.494174007671008*^9}, {
   3.4941741326011834`*^9, 3.4941741425911975`*^9}, {3.4941767936905165`*^9, 
   3.494176809630539*^9}, {3.494983386725746*^9, 3.4949833909065533`*^9}, 
   3.494983497719941*^9, {3.4949854524501743`*^9, 3.4949854564749813`*^9}, {
   3.4949859589098663`*^9, 3.4949859602514687`*^9}, {3.5535350662944365`*^9, 
   3.5535350662944365`*^9}, {3.5550157834103947`*^9, 
   3.5550157834103947`*^9}, {3.5550199816562724`*^9, 3.555019982786274*^9}, {
   3.555021364078208*^9, 3.555021364078208*^9}, {3.5550301305387526`*^9, 
   3.5550301305387526`*^9}, {3.555209785640831*^9, 3.555209785640831*^9}, {
   3.5853509691925974`*^9, 3.5853509701425986`*^9}, {3.586822449986575*^9, 
   3.586822449986575*^9}, {3.6712160321841865`*^9, 3.671216037542493*^9}, {
   3.6712162775212193`*^9, 3.6712162775212193`*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"\[Integral]", 
   RowBox[{
    SuperscriptBox["x", "m"], 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"a", "+", 
       RowBox[{"b", " ", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], 
    RowBox[{"\[DifferentialD]", "x"}]}]}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"  ", 
  RowBox[{
   RowBox[{"\[LongRightArrow]", "  ", 
    FractionBox[
     RowBox[{
      SuperscriptBox["x", "m"], " ", 
      SqrtBox[
       RowBox[{"1", "+", 
        RowBox[{
         SuperscriptBox["c", "2"], " ", 
         SuperscriptBox["x", "2"]}]}]], 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{"a", "+", 
         RowBox[{"b", " ", 
          RowBox[{"ArcSinh", "[", 
           RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], 
       RowBox[{"n", "+", "1"}]]}], 
     RowBox[{"b", " ", "c", 
      RowBox[{"(", 
       RowBox[{"n", "+", "1"}], ")"}]}]]}], "-", 
   RowBox[{
    FractionBox["1", 
     RowBox[{"b", " ", "c", 
      RowBox[{"(", 
       RowBox[{"n", "+", "1"}], ")"}]}]], 
    RowBox[{"\[Integral]", 
     RowBox[{
      FractionBox[
       RowBox[{
        SuperscriptBox["x", 
         RowBox[{"m", "-", "1"}]], " ", 
        RowBox[{"(", 
         RowBox[{"m", "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"m", "+", "1"}], ")"}], " ", 
           SuperscriptBox["c", "2"], " ", 
           SuperscriptBox["x", "2"]}]}], ")"}], " ", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{"a", "+", 
           RowBox[{"b", " ", 
            RowBox[{"ArcSinh", "[", 
             RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], 
         RowBox[{"n", "+", "1"}]]}], 
       SqrtBox[
        RowBox[{"1", "+", 
         RowBox[{
          SuperscriptBox["c", "2"], " ", 
          SuperscriptBox["x", "2"]}]}]]], 
      RowBox[{"\[DifferentialD]", "x"}]}]}]}]}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"  ", 
  RowBox[{
   RowBox[{"\[LongRightArrow]", "  ", 
    FractionBox[
     RowBox[{
      SuperscriptBox["x", "m"], " ", 
      SqrtBox[
       RowBox[{"1", "+", 
        RowBox[{
         SuperscriptBox["c", "2"], " ", 
         SuperscriptBox["x", "2"]}]}]], 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{"a", "+", 
         RowBox[{"b", " ", 
          RowBox[{"ArcSinh", "[", 
           RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], 
       RowBox[{"n", "+", "1"}]]}], 
     RowBox[{"b", " ", "c", 
      RowBox[{"(", 
       RowBox[{"n", "+", "1"}], ")"}]}]]}], "-", "\[IndentingNewLine]", 
   RowBox[{
    FractionBox["1", 
     RowBox[{
      SuperscriptBox["b", "2"], " ", 
      SuperscriptBox["c", 
       RowBox[{"m", "+", "1"}]], 
      RowBox[{"(", 
       RowBox[{"n", "+", "1"}], ")"}]}]], 
    RowBox[{"Subst", "[", 
     RowBox[{
      RowBox[{"\[Integral]", 
       RowBox[{
        SuperscriptBox["x", 
         RowBox[{"n", "+", "1"}]], 
        SuperscriptBox[
         RowBox[{"Sinh", "[", 
          RowBox[{
           RowBox[{"-", 
            FractionBox["a", "b"]}], "+", 
           FractionBox["x", "b"]}], "]"}], 
         RowBox[{"m", "-", "1"}]], " ", 
        RowBox[{"(", 
         RowBox[{"m", "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"m", "+", "1"}], ")"}], " ", 
           SuperscriptBox[
            RowBox[{"Sinh", "[", 
             RowBox[{
              RowBox[{"-", 
               FractionBox["a", "b"]}], "+", 
              FractionBox["x", "b"]}], "]"}], "2"]}]}], ")"}], 
        RowBox[{"\[DifferentialD]", "x"}]}]}], ",", "x", ",", 
      RowBox[{"a", "+", 
       RowBox[{"b", " ", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", " ", "x"}], "]"}]}]}]}], "]"}]}]}]}]}], "Subsubtitle",
 CellDingbat->None,
 CellChangeTimes->{{3.4796579732027807`*^9, 3.479658002474872*^9}, {
   3.4796580599975853`*^9, 3.4796580609489536`*^9}, {3.479658295195784*^9, 
   3.47965829684816*^9}, 3.4796611938939075`*^9, 3.4796613924794593`*^9, {
   3.479661443342597*^9, 3.479661446647349*^9}, {3.479661576554146*^9, 
   3.479661589302477*^9}, 3.479661847553824*^9, {3.4796622294729967`*^9, 
   3.4796622450654173`*^9}, {3.479686720424531*^9, 3.4796867204345455`*^9}, {
   3.4796874646646957`*^9, 3.4796874745589232`*^9}, {3.492826573513727*^9, 
   3.492826578630536*^9}, {3.4928267070863624`*^9, 3.492826707460763*^9}, 
   3.4928267903497095`*^9, {3.492829799151373*^9, 3.4928299617216005`*^9}, {
   3.4940972077187414`*^9, 3.4940972347887793`*^9}, {3.49409966398218*^9, 
   3.494099664952181*^9}, {3.4940997156722527`*^9, 3.494099716112253*^9}, 
   3.4941724567488375`*^9, {3.4941727384192314`*^9, 3.494172760679263*^9}, {
   3.4941763955899596`*^9, 3.4941764290900064`*^9}, {3.4941764605500507`*^9, 
   3.4941764930400963`*^9}, {3.4941882372412295`*^9, 3.49418823769363*^9}, {
   3.4949829455725713`*^9, 3.494982982560236*^9}, {3.4949831515865326`*^9, 
   3.4949831587937455`*^9}, {3.4949833118456144`*^9, 3.494983321252431*^9}, {
   3.494985141635228*^9, 3.4949851587796583`*^9}, 3.4949950434132323`*^9, {
   3.495070054224392*^9, 3.4950700747544203`*^9}, {3.4950703426847954`*^9, 
   3.4950703572848163`*^9}, {3.553401935852542*^9, 3.5534019541825676`*^9}, {
   3.5549133473905087`*^9, 3.5549133677405376`*^9}, {3.55521332028578*^9, 
   3.5552133988958893`*^9}, 3.5552134595359745`*^9, {3.5552134936860223`*^9, 
   3.5552134959960256`*^9}, {3.555213672856273*^9, 3.5552137305163536`*^9}, {
   3.555213762156398*^9, 3.5552137785964212`*^9}, {3.555214258817094*^9, 
   3.555214294217143*^9}, {3.55521466335766*^9, 3.555214691347699*^9}, {
   3.5552147297277527`*^9, 3.555214732587757*^9}, {3.555215023038163*^9, 
   3.5552151120882883`*^9}, 3.5552159978095284`*^9, 3.555216073209634*^9, {
   3.5552161274997096`*^9, 3.555216131349715*^9}, {3.5552163797600627`*^9, 
   3.5552163868400726`*^9}, {3.5552164981102285`*^9, 
   3.5552165537703066`*^9}, {3.555216587930354*^9, 3.5552166739404745`*^9}, {
   3.555217384431469*^9, 3.555217426401528*^9}, {3.555217555841709*^9, 
   3.5552175594917145`*^9}, 3.5552193777642603`*^9, {3.5853498580910416`*^9, 
   3.585349858151042*^9}, {3.5853499742412043`*^9, 3.5853499742612047`*^9}, {
   3.5853508099623747`*^9, 3.585350816352383*^9}, {3.5853514693457975`*^9, 
   3.5853514940058317`*^9}, {3.5861901481230445`*^9, 
   3.5861901481630445`*^9}, {3.586190688193801*^9, 3.5861906967738132`*^9}, {
   3.586191093429369*^9, 3.586191093439369*^9}, {3.586816068927642*^9, 
   3.586816156947765*^9}, {3.586816566298338*^9, 3.5868165687883415`*^9}, {
   3.5868206038139906`*^9, 3.586820671054085*^9}, {3.5868207024241285`*^9, 
   3.5868207065241346`*^9}, {3.5868208503043356`*^9, 3.586820875764371*^9}, {
   3.5868215412053027`*^9, 3.586821692085514*^9}, {3.5868233334578123`*^9, 
   3.586823336907817*^9}, {3.58682336749786*^9, 3.586823369547862*^9}, {
   3.6712147054182997`*^9, 3.6712147168589544`*^9}, {3.6713793004509077`*^9, 
   3.671379300482108*^9}, {3.6713797774358673`*^9, 3.6713797791362705`*^9}, {
   3.671380241371087*^9, 3.6713802432274904`*^9}, {3.671380345583275*^9, 
   3.67138034862528*^9}, {3.7529736069009285`*^9, 3.752973671063841*^9}, {
   3.753050544344034*^9, 3.753050555981655*^9}, {3.7530510976588817`*^9, 
   3.7530511017481155`*^9}, {3.753455710511668*^9, 3.7534557196220837`*^9}, 
   3.7534579104759226`*^9},
 TextAlignment->Center,
 FontSize->12,
 FontWeight->"Bold"],

Cell["Program code:", "Subsubsection",
 CellDingbat->"\[FilledSmallSquare]",
 CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
   3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9, 
   3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9, 
   3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
   3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9, 
   3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9, 
   3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9}, 
   3.4807050675119123`*^9, {3.492804314166378*^9, 3.4928043441496305`*^9}, {
   3.4928044532166224`*^9, 3.492804453513023*^9}, {3.492805162266266*^9, 
   3.492805165713872*^9}, 3.4941724567488375`*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"Int", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"x_", "^", "m_."}], "*", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{"a_.", "+", 
        RowBox[{"b_.", "*", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c_.", "*", "x_"}], "]"}]}]}], ")"}], "^", "n_"}]}], ",", 
    "x_Symbol"}], "]"}], " ", ":=", "\n", "  ", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"x", "^", "m"}], "*", 
     RowBox[{"Sqrt", "[", 
      RowBox[{"1", "+", 
       RowBox[{
        RowBox[{"c", "^", "2"}], "*", 
        RowBox[{"x", "^", "2"}]}]}], "]"}], "*", 
     RowBox[{
      RowBox[{
       RowBox[{"(", 
        RowBox[{"a", "+", 
         RowBox[{"b", "*", 
          RowBox[{"ArcSinh", "[", 
           RowBox[{"c", "*", "x"}], "]"}]}]}], ")"}], "^", 
       RowBox[{"(", 
        RowBox[{"n", "+", "1"}], ")"}]}], "/", 
      RowBox[{"(", 
       RowBox[{"b", "*", "c", "*", 
        RowBox[{"(", 
         RowBox[{"n", "+", "1"}], ")"}]}], ")"}]}]}], " ", "-", " ", "\n", 
    "  ", 
    RowBox[{
     RowBox[{"1", "/", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"b", "^", "2"}], "*", 
        RowBox[{"c", "^", 
         RowBox[{"(", 
          RowBox[{"m", "+", "1"}], ")"}]}], "*", 
        RowBox[{"(", 
         RowBox[{"n", "+", "1"}], ")"}]}], ")"}]}], "*", "\n", "    ", 
     RowBox[{"Subst", "[", 
      RowBox[{
       RowBox[{"Int", "[", 
        RowBox[{
         RowBox[{"ExpandTrigReduce", "[", 
          RowBox[{
           RowBox[{"x", "^", 
            RowBox[{"(", 
             RowBox[{"n", "+", "1"}], ")"}]}], ",", 
           RowBox[{
            RowBox[{
             RowBox[{"Sinh", "[", 
              RowBox[{
               RowBox[{
                RowBox[{"-", "a"}], "/", "b"}], "+", 
               RowBox[{"x", "/", "b"}]}], "]"}], "^", 
             RowBox[{"(", 
              RowBox[{"m", "-", "1"}], ")"}]}], "*", 
            RowBox[{"(", 
             RowBox[{"m", "+", 
              RowBox[{
               RowBox[{"(", 
                RowBox[{"m", "+", "1"}], ")"}], "*", 
               RowBox[{
                RowBox[{"Sinh", "[", 
                 RowBox[{
                  RowBox[{
                   RowBox[{"-", "a"}], "/", "b"}], "+", 
                  RowBox[{"x", "/", "b"}]}], "]"}], "^", "2"}]}]}], ")"}]}], 
           ",", "x"}], "]"}], ",", "x"}], "]"}], ",", "x", ",", 
       RowBox[{"a", "+", 
        RowBox[{"b", "*", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c", "*", "x"}], "]"}]}]}]}], "]"}]}]}], " ", "/;", "\n", 
   RowBox[{
    RowBox[{"FreeQ", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"a", ",", "b", ",", "c"}], "}"}], ",", "x"}], "]"}], " ", "&&",
     " ", 
    RowBox[{"IGtQ", "[", 
     RowBox[{"m", ",", "0"}], "]"}], " ", "&&", " ", 
    RowBox[{"GeQ", "[", 
     RowBox[{"n", ",", 
      RowBox[{"-", "2"}]}], "]"}], " ", "&&", " ", 
    RowBox[{"LtQ", "[", 
     RowBox[{"n", ",", 
      RowBox[{"-", "1"}]}], "]"}]}]}]}]], "Code",
 CellChangeTimes->{{3.494097279728842*^9, 3.494097309778884*^9}, {
   3.494099665582182*^9, 3.4940996672021847`*^9}, {3.4940997193022575`*^9, 
   3.494099719662258*^9}, 3.4941724567488375`*^9, 3.494172717389202*^9, {
   3.4941763709899254`*^9, 3.49417638178994*^9}, {3.4950424525902324`*^9, 
   3.4950425131303167`*^9}, {3.495045395254352*^9, 3.4950455421745577`*^9}, {
   3.495045613344657*^9, 3.495045623144671*^9}, 3.495046501655901*^9, 
   3.495047583047415*^9, 3.4950476263774757`*^9, 3.553373242560835*^9, {
   3.5533733015562096`*^9, 3.5533733049994063`*^9}, 3.553377717427166*^9, {
   3.553377865647644*^9, 3.553377874009122*^9}, {3.553402502413335*^9, 
   3.5534025332833786`*^9}, {3.5534035146147523`*^9, 3.553403612484889*^9}, {
   3.553468670048935*^9, 3.5534686745161796`*^9}, {3.5534688089220047`*^9, 
   3.55346883384204*^9}, 3.5535646024048843`*^9, 3.5549307021136136`*^9, 
   3.5549307778237195`*^9, 3.5549308447738132`*^9, {3.55493200677544*^9, 
   3.5549320070354404`*^9}, {3.554935254679987*^9, 3.5549352848900294`*^9}, {
   3.555020035486348*^9, 3.5550200850564175`*^9}, 3.5550201692665353`*^9, {
   3.5550213678582134`*^9, 3.5550213735982213`*^9}, 3.555021478148368*^9, {
   3.555030812949708*^9, 3.5550308473997564`*^9}, 3.5551771409552813`*^9, 
   3.555177205405371*^9, {3.5552098114408674`*^9, 3.5552098224408827`*^9}, {
   3.555209898370989*^9, 3.5552099482310586`*^9}, {3.5552110659826236`*^9, 
   3.555211066272624*^9}, {3.5853498816010747`*^9, 3.5853498816110744`*^9}, 
   3.5853500358912907`*^9, 3.585350107691391*^9, 3.5853501514714527`*^9, 
   3.5853508901824865`*^9, {3.58535102133267*^9, 3.5853510452327037`*^9}, 
   3.5861902274631557`*^9, {3.586190276533224*^9, 3.586190276533224*^9}, 
   3.5861903271082954`*^9, {3.5861906199712057`*^9, 3.586190625803714*^9}, 
   3.5868220656260366`*^9, 3.58682209624608*^9, {3.586822465006596*^9, 
   3.586822477066613*^9}, {3.5868233809878783`*^9, 3.5868233831478815`*^9}, {
   3.5868238626160564`*^9, 3.5868238791060796`*^9}, {3.671216055078496*^9, 
   3.6712160577816505`*^9}, {3.6713793004977083`*^9, 3.6713793005133085`*^9}, 
   3.671379831973963*^9, {3.6713807420108957`*^9, 3.671380756440921*^9}, {
   3.7152179517612524`*^9, 3.715217999394977*^9}, {3.7529737065539036`*^9, 
   3.752973761513133*^9}, {3.753051119139053*^9, 3.7530511196070538`*^9}, {
   3.753455739527719*^9, 3.753455759916955*^9}, 3.753457915670732*^9},
 Background->GrayLevel[0.85]],

Cell["", "Subsubsection",
 CellDingbat->None,
 CellChangeTimes->{3.4796643211106243`*^9, 3.4941724567488375`*^9}]
}, Closed]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\t\t", 
  RowBox[{Cell[TextData[StyleBox["2:",
    FontFamily->"Arial",
    FontColor->RGBColor[1, 0, 0]]], "None"], "  ", 
   RowBox[{"\[Integral]", 
    RowBox[{
     SuperscriptBox["x", "m"], " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"a", "+", 
        RowBox[{"b", " ", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], 
     RowBox[{"\[DifferentialD]", "x"}], "  ", 
     StyleBox["when",
      FontFamily->"Arial",
      FontWeight->"Plain"], 
     StyleBox["  ",
      FontFamily->"Arial",
      FontWeight->"Plain"], Cell[TextData[Cell[BoxData[
      RowBox[{
       RowBox[{"m", "\[Element]", 
        SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}], "\[And]", " ", 
       RowBox[{"n", "<", 
        RowBox[{"-", "2"}]}]}]]]], "None"]}]}]}]}]], "Subsubtitle",
 CellDingbat->None,
 CellChangeTimes->{
  3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
   3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9, 
   3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9, 
   3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9}, 
   3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9}, 
   3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9, 
   3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
   3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9, 
   3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
   3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9, 
   3.519247079685614*^9, {3.5193208582062006`*^9, 3.5193208612170057`*^9}, 
   3.5193325694253187`*^9, {3.5193422443984776`*^9, 3.5193422447260776`*^9}, 
   3.5193424488212357`*^9, {3.5193434708254333`*^9, 3.519343473103037*^9}, {
   3.5193435097631016`*^9, 3.51934353169674*^9}, {3.519345739319023*^9, 
   3.519345739599823*^9}, 3.5193462601259375`*^9, {3.5193475061060295`*^9, 
   3.5193475233908596`*^9}, {3.519351391880224*^9, 3.5193513931402254`*^9}, {
   3.519403773021052*^9, 3.5194037798564425`*^9}, 3.5194106793250647`*^9, {
   3.519537578341393*^9, 3.5195375792305946`*^9}, {3.5195376277778797`*^9, 
   3.51953767927357*^9}, {3.5197586260636144`*^9, 3.5197586260636144`*^9}, {
   3.51978053295651*^9, 3.519780542862528*^9}, {3.5197806526087203`*^9, 
   3.5197806657595434`*^9}, {3.5197807490168896`*^9, 3.5197807642581167`*^9}, 
   3.5197809004619555`*^9, {3.519782653514635*^9, 3.5197826623286505`*^9}, {
   3.5200207810164795`*^9, 3.520020785046485*^9}, {3.5213126833374643`*^9, 
   3.5213126833374643`*^9}, {3.521328235411002*^9, 3.521328235411002*^9}, {
   3.523315567893022*^9, 3.523315567893022*^9}, {3.5233157569332867`*^9, 
   3.5233157613032923`*^9}, {3.5323023198133526`*^9, 3.532302355723403*^9}, {
   3.5323026417638035`*^9, 3.5323026417638035`*^9}, {3.5323026980138817`*^9, 
   3.5323026980138817`*^9}, {3.532636287104328*^9, 3.532636287104328*^9}, {
   3.5330803686035347`*^9, 3.533080368863535*^9}, {3.533248909289961*^9, 
   3.5332489110299635`*^9}, {3.534962469565694*^9, 3.5349624910757236`*^9}, {
   3.5349625224057674`*^9, 3.534962522655768*^9}, {3.534965265519608*^9, 
   3.534965265519608*^9}, {3.5349668288168063`*^9, 3.5349668292668066`*^9}, {
   3.5349747358481646`*^9, 3.5349747358481646`*^9}, {3.534975457949176*^9, 
   3.534975457949176*^9}, {3.5368633963532934`*^9, 3.536863396571694*^9}, {
   3.541644322511304*^9, 3.5416443577513533`*^9}, {3.5416458269234104`*^9, 
   3.541645839633428*^9}, {3.5416460312236967`*^9, 3.541646031483697*^9}, 
   3.541646227783972*^9, {3.541647080335165*^9, 3.5416471077052035`*^9}, {
   3.541648997607849*^9, 3.5416489978278494`*^9}, 3.541649088407976*^9, {
   3.5417848711596775`*^9, 3.541784902429721*^9}, {3.541786145331461*^9, 
   3.5417861455914617`*^9}, {3.5417870037166634`*^9, 3.5417870039366636`*^9}, 
   3.5462979620242105`*^9, {3.546298264094633*^9, 3.546298265344635*^9}, {
   3.546299000235664*^9, 3.546299001505666*^9}, {3.546315119909564*^9, 
   3.5463151267659564`*^9}, {3.547227356319705*^9, 3.547227356319705*^9}, 
   3.547918559331044*^9, {3.547918610170952*^9, 3.5479186304411116`*^9}, 
   3.548537755517557*^9, 3.5485441629685287`*^9, 3.5485517520154133`*^9, {
   3.5488740727887154`*^9, 3.5488740727887154`*^9}, {3.548874206618903*^9, 
   3.548874206808903*^9}, 3.548877100795455*^9, 3.550596464087599*^9, {
   3.5505965767870445`*^9, 3.5505965767870445`*^9}, 3.5505966202465305`*^9, {
   3.5506039138305197`*^9, 3.55060391400453*^9}, {3.5506040039986773`*^9, 
   3.550604005776779*^9}, {3.5506178888272758`*^9, 3.5506178900273447`*^9}, {
   3.550770598144562*^9, 3.550770659629079*^9}, {3.5507707252908344`*^9, 
   3.5507707474461017`*^9}, 3.5507880023630266`*^9, {3.5508017696214375`*^9, 
   3.5508017788269644`*^9}, {3.5508018116158395`*^9, 3.5508018116158395`*^9}, 
   3.5508018976437597`*^9, {3.5508021384015307`*^9, 3.550802155115487*^9}, {
   3.5508022151019173`*^9, 3.5508022151019173`*^9}, {3.550802487106476*^9, 
   3.5508025179152374`*^9}, {3.5508029261175857`*^9, 
   3.5508029342300496`*^9}, {3.5521511708590136`*^9, 3.5521511712334137`*^9}, 
   3.552151666269083*^9, {3.5535324250863676`*^9, 3.553532441643315*^9}, {
   3.553532476791325*^9, 3.553532477502366*^9}, {3.5535326974779477`*^9, 
   3.553532702538237*^9}, {3.5535344714234114`*^9, 3.5535344716114225`*^9}, {
   3.553534609425305*^9, 3.5535346176407747`*^9}, {3.553534959099305*^9, 
   3.5535349593163176`*^9}, {3.553535021040848*^9, 3.5535350459282713`*^9}, 
   3.5549205505005956`*^9, {3.5549324040459967`*^9, 3.554932404265997*^9}, 
   3.555191812705942*^9, 3.555192226666522*^9, {3.5551926852315736`*^9, 
   3.555192685461574*^9}, {3.5552039862027116`*^9, 3.5552039878427143`*^9}, {
   3.5552161917098*^9, 3.555216204229817*^9}, {3.5552164553601685`*^9, 
   3.5552164553601685`*^9}, 3.555217537311683*^9, 3.5853498580710416`*^9, 
   3.5853508093123736`*^9, {3.5853513580931416`*^9, 3.5853513580931416`*^9}, 
   3.5861901481130447`*^9, 3.586364224333449*^9, {3.5868161787277956`*^9, 
   3.5868161787277956`*^9}, {3.5868178803301773`*^9, 
   3.5868178823201804`*^9}, {3.586819580442558*^9, 3.586819581502559*^9}, {
   3.586819642642645*^9, 3.586819642842645*^9}, {3.586819679682697*^9, 
   3.586819679682697*^9}, {3.5868197994428644`*^9, 3.586819808492877*^9}, {
   3.5868225993367844`*^9, 3.5868226194168124`*^9}, {3.586968036915536*^9, 
   3.586968038000537*^9}, 3.5869689642268715`*^9, 3.5869858475549455`*^9, {
   3.586986147392877*^9, 3.586986147392877*^9}, 3.586988624956362*^9, 
   3.586991547200453*^9, {3.586997622348958*^9, 3.586997622348958*^9}, 
   3.620157937661265*^9, 3.6202686244487085`*^9, 3.6202699637733135`*^9, {
   3.671214554586673*^9, 3.671214556778798*^9}, 3.6712148731838956`*^9, {
   3.6712150395204096`*^9, 3.671215039946434*^9}, 3.6712159214788547`*^9, {
   3.6712160887284207`*^9, 3.6712160887284207`*^9}, {3.6712162730839653`*^9, 
   3.6712162730839653`*^9}, 3.6713793005289083`*^9},
 FontSize->12,
 FontWeight->"Bold"],

Cell["Derivation: Integration by parts and algebraic expansion", \
"Subsubsection",
 CellChangeTimes->{
  3.4941724567488375`*^9, 3.494172818179343*^9, {3.495045874395023*^9, 
   3.495045875835025*^9}, {3.4950462556855564`*^9, 3.495046257635559*^9}, 
   3.553373119004768*^9, {3.620270077115796*^9, 3.6202700815220485`*^9}}],

Cell[TextData[{
 "Basis: ",
 Cell[BoxData[
  RowBox[{
   FractionBox[
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"a", "+", 
       RowBox[{"b", " ", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], 
    SqrtBox[
     RowBox[{"1", "+", 
      RowBox[{
       SuperscriptBox["c", "2"], " ", 
       SuperscriptBox["x", "2"]}]}]]], "\[Equal]", 
   RowBox[{
    SubscriptBox["\[PartialD]", "x"], 
    FractionBox[
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"a", "+", 
        RowBox[{"b", " ", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], 
      RowBox[{"n", "+", "1"}]], 
     RowBox[{"b", " ", "c", " ", 
      RowBox[{"(", 
       RowBox[{"n", "+", "1"}], ")"}]}]]}]}]],
  CellChangeTimes->{{3.5869835620991554`*^9, 3.58698356510916*^9}, {
   3.5869836080692215`*^9, 3.5869836267667484`*^9}}]
}], "Subsubsection",
 CellChangeTimes->{
  3.4941724567488375`*^9, 3.494172818179343*^9, {3.495045874395023*^9, 
   3.495045875835025*^9}, {3.4950462556855564`*^9, 3.495046257635559*^9}, 
   3.553373119004768*^9, {3.586983544896631*^9, 3.5869835463566327`*^9}, 
   3.586983632146756*^9, {3.6713793005289083`*^9, 3.671379300544508*^9}, {
   3.671379779978672*^9, 3.671379779978672*^9}}],

Cell[TextData[{
 "Basis: ",
 Cell[BoxData[
  RowBox[{
   RowBox[{
    SubscriptBox["\[PartialD]", "x"], 
    RowBox[{"(", 
     RowBox[{
      SuperscriptBox["x", "m"], " ", 
      SqrtBox[
       RowBox[{"1", "+", 
        RowBox[{
         SuperscriptBox["c", "2"], " ", 
         SuperscriptBox["x", "2"]}]}]]}], ")"}]}], "\[Equal]", 
   RowBox[{
    FractionBox[
     RowBox[{"m", " ", 
      SuperscriptBox["x", 
       RowBox[{"m", "-", "1"}]]}], 
     SqrtBox[
      RowBox[{"1", "+", 
       RowBox[{
        SuperscriptBox["c", "2"], " ", 
        SuperscriptBox["x", "2"]}]}]]], "+", 
    FractionBox[
     RowBox[{
      SuperscriptBox["c", "2"], " ", 
      RowBox[{"(", 
       RowBox[{"m", "+", "1"}], ")"}], " ", 
      SuperscriptBox["x", 
       RowBox[{"m", "+", "1"}]]}], 
     SqrtBox[
      RowBox[{"1", "+", 
       RowBox[{
        SuperscriptBox["c", "2"], " ", 
        SuperscriptBox["x", "2"]}]}]]]}]}]],
  CellChangeTimes->{{3.5869835620991554`*^9, 3.58698356510916*^9}, {
   3.5869836080692215`*^9, 3.5869836267667484`*^9}}]
}], "Subsubsection",
 CellChangeTimes->{
  3.4941724567488375`*^9, 3.494172818179343*^9, {3.495045874395023*^9, 
   3.495045875835025*^9}, {3.4950462556855564`*^9, 3.495046257635559*^9}, 
   3.553373119004768*^9, {3.586983544896631*^9, 3.5869835463566327`*^9}, 
   3.586983632146756*^9, {3.5869838519945726`*^9, 3.5869838519945726`*^9}, {
   3.6202700626399684`*^9, 3.6202700626399684`*^9}, {3.671214567893434*^9, 
   3.671214588388606*^9}, {3.671214922951742*^9, 3.671214922951742*^9}, {
   3.671379780555873*^9, 3.6713797816790752`*^9}, {3.6713808166744285`*^9, 
   3.6713808166744285`*^9}}],

Cell[TextData[{
 "Rule: If  ",
 Cell[BoxData[
  RowBox[{
   RowBox[{"m", "\[Element]", 
    SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}], "\[And]", " ", 
   RowBox[{"n", "<", 
    RowBox[{"-", "2"}]}]}]]],
 ", then"
}], "Subsubsection",
 CellDingbat->"\[FilledSmallSquare]",
 CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
   3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9, 
   3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9, 
   3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
   3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9, 
   3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9, 
   3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9}, 
   3.48070534977779*^9, {3.4928296953212276`*^9, 3.492829707041244*^9}, 
   3.4941724084687696`*^9, 3.4941724567488375`*^9, {3.4941737492506466`*^9, 
   3.4941737506706486`*^9}, {3.494173966810951*^9, 3.494174007671008*^9}, {
   3.4941741326011834`*^9, 3.4941741425911975`*^9}, {3.4941767936905165`*^9, 
   3.494176809630539*^9}, {3.494983386725746*^9, 3.4949833909065533`*^9}, 
   3.494983497719941*^9, {3.4949854524501743`*^9, 3.4949854564749813`*^9}, {
   3.495039788036502*^9, 3.4950397900365047`*^9}, {3.553534650984682*^9, 
   3.553534650984682*^9}, {3.553535076696031*^9, 3.553535076696031*^9}, {
   3.555217544931694*^9, 3.555217544931694*^9}, {3.585351358773143*^9, 
   3.585351358773143*^9}, {3.58681618880781*^9, 3.58681618880781*^9}, {
   3.586819814092885*^9, 3.586819814092885*^9}, {3.5868226216368155`*^9, 
   3.5868226216368155`*^9}, {3.5869861498178806`*^9, 
   3.5869861498178806`*^9}, {3.586997624628961*^9, 3.586997624628961*^9}, {
   3.671216079885915*^9, 3.671216084202162*^9}, {3.6712162839615874`*^9, 
   3.6712162839615874`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"\[Integral]", 
   RowBox[{
    SuperscriptBox["x", "m"], 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"a", "+", 
       RowBox[{"b", " ", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], 
    RowBox[{"\[DifferentialD]", 
     RowBox[{"x", "  ", "\[LongRightArrow]", "  ", "\[IndentingNewLine]", 
      FractionBox[
       RowBox[{
        SuperscriptBox["x", "m"], " ", 
        SqrtBox[
         RowBox[{"1", "+", 
          RowBox[{
           SuperscriptBox["c", "2"], " ", 
           SuperscriptBox["x", "2"]}]}]], 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{"a", "+", 
           RowBox[{"b", " ", 
            RowBox[{"ArcSinh", "[", 
             RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], 
         RowBox[{"n", "+", "1"}]]}], 
       RowBox[{"b", " ", "c", 
        RowBox[{"(", 
         RowBox[{"n", "+", "1"}], ")"}]}]]}]}]}]}], "-", 
  "\[IndentingNewLine]", 
  RowBox[{
   FractionBox["m", 
    RowBox[{"b", " ", "c", 
     RowBox[{"(", 
      RowBox[{"n", "+", "1"}], ")"}]}]], 
   RowBox[{"\[Integral]", 
    RowBox[{
     FractionBox[
      RowBox[{
       SuperscriptBox["x", 
        RowBox[{"m", "-", "1"}]], 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{"a", "+", 
          RowBox[{"b", " ", 
           RowBox[{"ArcSinh", "[", 
            RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], 
        RowBox[{"n", "+", "1"}]]}], 
      SqrtBox[
       RowBox[{"1", "+", 
        RowBox[{
         SuperscriptBox["c", "2"], " ", 
         SuperscriptBox["x", "2"]}]}]]], 
     RowBox[{"\[DifferentialD]", "x"}]}]}]}], "-", 
  RowBox[{
   FractionBox[
    RowBox[{"c", 
     RowBox[{"(", 
      RowBox[{"m", "+", "1"}], ")"}]}], 
    RowBox[{"b", " ", 
     RowBox[{"(", 
      RowBox[{"n", "+", "1"}], ")"}]}]], 
   RowBox[{"\[Integral]", 
    RowBox[{
     FractionBox[
      RowBox[{
       SuperscriptBox["x", 
        RowBox[{"m", "+", "1"}]], 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{"a", "+", 
          RowBox[{"b", " ", 
           RowBox[{"ArcSinh", "[", 
            RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], 
        RowBox[{"n", "+", "1"}]]}], 
      SqrtBox[
       RowBox[{"1", "+", 
        RowBox[{
         SuperscriptBox["c", "2"], " ", 
         SuperscriptBox["x", "2"]}]}]]], 
     RowBox[{"\[DifferentialD]", "x"}]}]}]}]}]], "Subsubtitle",
 CellDingbat->None,
 CellChangeTimes->{{3.4796579732027807`*^9, 3.479658002474872*^9}, {
   3.4796580599975853`*^9, 3.4796580609489536`*^9}, {3.479658295195784*^9, 
   3.47965829684816*^9}, 3.4796611938939075`*^9, 3.4796613924794593`*^9, {
   3.479661443342597*^9, 3.479661446647349*^9}, {3.479661576554146*^9, 
   3.479661589302477*^9}, 3.479661847553824*^9, {3.4796622294729967`*^9, 
   3.4796622450654173`*^9}, {3.479686720424531*^9, 3.4796867204345455`*^9}, {
   3.4796874646646957`*^9, 3.4796874745589232`*^9}, {3.492826573513727*^9, 
   3.492826578630536*^9}, {3.4928267070863624`*^9, 3.492826707460763*^9}, 
   3.4928267903497095`*^9, {3.492829799151373*^9, 3.4928299617216005`*^9}, {
   3.4940972077187414`*^9, 3.4940972347887793`*^9}, {3.49409966398218*^9, 
   3.494099664952181*^9}, {3.4940997156722527`*^9, 3.494099716112253*^9}, 
   3.4941724567488375`*^9, {3.4941727384192314`*^9, 3.494172760679263*^9}, {
   3.4941763955899596`*^9, 3.4941764290900064`*^9}, {3.4941764605500507`*^9, 
   3.4941764930400963`*^9}, {3.4941882372412295`*^9, 3.49418823769363*^9}, {
   3.4949829455725713`*^9, 3.494982982560236*^9}, {3.4949831515865326`*^9, 
   3.4949831587937455`*^9}, {3.4949833118456144`*^9, 3.494983321252431*^9}, {
   3.494985141635228*^9, 3.4949851587796583`*^9}, 3.4949950434132323`*^9, {
   3.495070054224392*^9, 3.4950700747544203`*^9}, {3.4950703426847954`*^9, 
   3.4950703572848163`*^9}, {3.553401935852542*^9, 3.5534019541825676`*^9}, {
   3.5549133473905087`*^9, 3.5549133677405376`*^9}, {3.55521332028578*^9, 
   3.5552133988958893`*^9}, 3.5552134595359745`*^9, {3.5552134936860223`*^9, 
   3.5552134959960256`*^9}, {3.555213672856273*^9, 3.5552137305163536`*^9}, {
   3.555213762156398*^9, 3.5552137785964212`*^9}, {3.555214258817094*^9, 
   3.555214294217143*^9}, {3.55521466335766*^9, 3.555214691347699*^9}, {
   3.5552147297277527`*^9, 3.555214732587757*^9}, {3.555215023038163*^9, 
   3.5552151120882883`*^9}, 3.5552159978095284`*^9, 3.555216073209634*^9, {
   3.5552161274997096`*^9, 3.555216131349715*^9}, {3.5552163797600627`*^9, 
   3.5552163868400726`*^9}, {3.5552164981102285`*^9, 
   3.5552165537703066`*^9}, {3.555216587930354*^9, 3.5552166739404745`*^9}, {
   3.555217384431469*^9, 3.555217426401528*^9}, {3.555217555841709*^9, 
   3.5552175594917145`*^9}, 3.5552193777642603`*^9, {3.5853498580910416`*^9, 
   3.585349858151042*^9}, {3.5853499742412043`*^9, 3.5853499742612047`*^9}, {
   3.5853508099623747`*^9, 3.585350816352383*^9}, {3.5853514693457975`*^9, 
   3.5853514940058317`*^9}, {3.5861901481230445`*^9, 
   3.5861901481630445`*^9}, {3.586190688193801*^9, 3.5861906967738132`*^9}, {
   3.586191093429369*^9, 3.586191093439369*^9}, {3.586816068927642*^9, 
   3.586816156947765*^9}, {3.586816566298338*^9, 3.5868165687883415`*^9}, {
   3.586985849809949*^9, 3.586985895932515*^9}, {3.586988627226365*^9, 
   3.5869886433763876`*^9}, {3.620269966002441*^9, 3.6202699995563602`*^9}, {
   3.671214607279687*^9, 3.671214610669881*^9}, 3.6712146481860266`*^9, {
   3.6712149318622513`*^9, 3.671214948758218*^9}, {3.671379300544508*^9, 
   3.6713793005757084`*^9}, {3.6713797824122763`*^9, 3.6713797834730783`*^9}, 
   3.67138086901552*^9},
 TextAlignment->Center,
 FontSize->12,
 FontWeight->"Bold"],

Cell["Program code:", "Subsubsection",
 CellDingbat->"\[FilledSmallSquare]",
 CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
   3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9, 
   3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9, 
   3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
   3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9, 
   3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9, 
   3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9}, 
   3.4807050675119123`*^9, {3.492804314166378*^9, 3.4928043441496305`*^9}, {
   3.4928044532166224`*^9, 3.492804453513023*^9}, {3.492805162266266*^9, 
   3.492805165713872*^9}, 3.4941724567488375`*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"Int", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"x_", "^", "m_."}], "*", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{"a_.", "+", 
        RowBox[{"b_.", "*", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c_.", "*", "x_"}], "]"}]}]}], ")"}], "^", "n_"}]}], ",", 
    "x_Symbol"}], "]"}], " ", ":=", "\n", "  ", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"x", "^", "m"}], "*", 
     RowBox[{"Sqrt", "[", 
      RowBox[{"1", "+", 
       RowBox[{
        RowBox[{"c", "^", "2"}], "*", 
        RowBox[{"x", "^", "2"}]}]}], "]"}], "*", 
     RowBox[{
      RowBox[{
       RowBox[{"(", 
        RowBox[{"a", "+", 
         RowBox[{"b", "*", 
          RowBox[{"ArcSinh", "[", 
           RowBox[{"c", "*", "x"}], "]"}]}]}], ")"}], "^", 
       RowBox[{"(", 
        RowBox[{"n", "+", "1"}], ")"}]}], "/", 
      RowBox[{"(", 
       RowBox[{"b", "*", "c", "*", 
        RowBox[{"(", 
         RowBox[{"n", "+", "1"}], ")"}]}], ")"}]}]}], " ", "-", " ", "\n", 
    "  ", 
    RowBox[{
     RowBox[{"m", "/", 
      RowBox[{"(", 
       RowBox[{"b", "*", "c", "*", 
        RowBox[{"(", 
         RowBox[{"n", "+", "1"}], ")"}]}], ")"}]}], "*", 
     RowBox[{"Int", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"x", "^", 
         RowBox[{"(", 
          RowBox[{"m", "-", "1"}], ")"}]}], "*", 
        RowBox[{
         RowBox[{
          RowBox[{"(", 
           RowBox[{"a", "+", 
            RowBox[{"b", "*", 
             RowBox[{"ArcSinh", "[", 
              RowBox[{"c", "*", "x"}], "]"}]}]}], ")"}], "^", 
          RowBox[{"(", 
           RowBox[{"n", "+", "1"}], ")"}]}], "/", 
         RowBox[{"Sqrt", "[", 
          RowBox[{"1", "+", 
           RowBox[{
            RowBox[{"c", "^", "2"}], "*", 
            RowBox[{"x", "^", "2"}]}]}], "]"}]}]}], ",", "x"}], "]"}]}], " ", 
    "-", " ", "\n", "  ", 
    RowBox[{"c", "*", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{"m", "+", "1"}], ")"}], "/", 
      RowBox[{"(", 
       RowBox[{"b", "*", 
        RowBox[{"(", 
         RowBox[{"n", "+", "1"}], ")"}]}], ")"}]}], "*", 
     RowBox[{"Int", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"x", "^", 
         RowBox[{"(", 
          RowBox[{"m", "+", "1"}], ")"}]}], "*", 
        RowBox[{
         RowBox[{
          RowBox[{"(", 
           RowBox[{"a", "+", 
            RowBox[{"b", "*", 
             RowBox[{"ArcSinh", "[", 
              RowBox[{"c", "*", "x"}], "]"}]}]}], ")"}], "^", 
          RowBox[{"(", 
           RowBox[{"n", "+", "1"}], ")"}]}], "/", 
         RowBox[{"Sqrt", "[", 
          RowBox[{"1", "+", 
           RowBox[{
            RowBox[{"c", "^", "2"}], "*", 
            RowBox[{"x", "^", "2"}]}]}], "]"}]}]}], ",", "x"}], "]"}]}]}], 
   " ", "/;", "\n", 
   RowBox[{
    RowBox[{"FreeQ", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"a", ",", "b", ",", "c"}], "}"}], ",", "x"}], "]"}], " ", "&&",
     " ", 
    RowBox[{"IGtQ", "[", 
     RowBox[{"m", ",", "0"}], "]"}], " ", "&&", " ", 
    RowBox[{"LtQ", "[", 
     RowBox[{"n", ",", 
      RowBox[{"-", "2"}]}], "]"}]}]}]}]], "Code",
 CellChangeTimes->{{3.494097279728842*^9, 3.494097309778884*^9}, {
   3.494099665582182*^9, 3.4940996672021847`*^9}, {3.4940997193022575`*^9, 
   3.494099719662258*^9}, 3.4941724567488375`*^9, 3.494172717389202*^9, {
   3.4941763709899254`*^9, 3.49417638178994*^9}, {3.4949830204059024`*^9, 
   3.494983029282318*^9}, {3.4949830779076033`*^9, 3.4949831399333124`*^9}, {
   3.494983175407775*^9, 3.494983200321018*^9}, {3.4949832337830772`*^9, 
   3.4949832374490833`*^9}, {3.4949833261976395`*^9, 3.494983340034864*^9}, {
   3.4949834012961717`*^9, 3.4949834200630045`*^9}, {3.4949835020723486`*^9, 
   3.4949835143807697`*^9}, {3.494985256061429*^9, 3.494985357180807*^9}, {
   3.4949854103457003`*^9, 3.4949854160709105`*^9}, {3.4949856987014093`*^9, 
   3.4949857491362977`*^9}, 3.4949859360870256`*^9, 3.49498608094888*^9, {
   3.4949950655340714`*^9, 3.494995107841346*^9}, {3.494995146779014*^9, 
   3.494995147184615*^9}, {3.4950397717164793`*^9, 3.4950397741964827`*^9}, {
   3.5533775888394337`*^9, 3.5533775933478413`*^9}, {3.5534019834726086`*^9, 
   3.5534020128126497`*^9}, {3.5534020785627418`*^9, 3.553402079012742*^9}, {
   3.5535346319465933`*^9, 3.5535346410991163`*^9}, {3.5535350862585783`*^9, 
   3.553535088353698*^9}, {3.5549134556606607`*^9, 3.5549134703506813`*^9}, {
   3.55491351935075*^9, 3.554913521820753*^9}, 3.555216294819944*^9, 
   3.555217673201874*^9, {3.55521771341193*^9, 3.5552177539219866`*^9}, 
   3.5552180961624656`*^9, {3.5552194795944023`*^9, 3.5552194851544104`*^9}, {
   3.585349881731075*^9, 3.585349881761075*^9}, 3.585350035941291*^9, 
   3.5853501077513914`*^9, 3.585350151521453*^9, 3.5853508902324867`*^9, {
   3.5853511334028273`*^9, 3.58535113553283*^9}, {3.5853512823230357`*^9, 
   3.585351304643067*^9}, {3.5853514998858404`*^9, 3.585351504825847*^9}, 
   3.5861902275431557`*^9, {3.5861902766332245`*^9, 3.5861902766532245`*^9}, 
   3.586190327178295*^9, {3.5861907020238204`*^9, 3.5861907041838236`*^9}, 
   3.5868164452981687`*^9, {3.5868165260082817`*^9, 3.5868165415583034`*^9}, {
   3.5868165767183523`*^9, 3.5868165784483547`*^9}, {3.586817864840156*^9, 
   3.586817868400161*^9}, 3.586818089830471*^9, 3.586818711951342*^9, {
   3.586819849182934*^9, 3.5868198591929483`*^9}, 3.586822624296819*^9, {
   3.5869859290650625`*^9, 3.586985983495141*^9}, 3.586986152042884*^9, {
   3.5869886706464252`*^9, 3.5869886983364644`*^9}, 3.586997626438964*^9, {
   3.6202701332730083`*^9, 3.620270164167775*^9}, {3.6712146152961454`*^9, 
   3.671214622461555*^9}, {3.6712149629250283`*^9, 3.6712149960589237`*^9}, {
   3.6712160929886646`*^9, 3.6712160949847784`*^9}, {3.6713793005757084`*^9, 
   3.6713793006069083`*^9}, {3.671379833643166*^9, 3.6713798350471687`*^9}, 
   3.67138090878199*^9, 3.715217951774253*^9, {3.715218016791972*^9, 
   3.7152180217792573`*^9}},
 Background->GrayLevel[0.85]],

Cell["", "Subsubsection",
 CellDingbat->None,
 CellChangeTimes->{3.4796643211106243`*^9, 3.4941724567488375`*^9}]
}, Closed]]
}, Closed]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\t", 
  RowBox[{Cell[TextData[StyleBox["3:",
    FontFamily->"Arial",
    FontColor->RGBColor[1, 0, 0]]], "None"], "  ", 
   RowBox[{"\[Integral]", 
    RowBox[{
     SuperscriptBox["x", "m"], " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"a", "+", 
        RowBox[{"b", " ", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], 
     RowBox[{"\[DifferentialD]", "x"}], "  ", 
     StyleBox["when",
      FontFamily->"Arial",
      FontWeight->"Plain"], 
     StyleBox["  ",
      FontFamily->"Arial",
      FontWeight->"Plain"], Cell[TextData[Cell[BoxData[
      RowBox[{"m", "\[Element]", 
       SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}]]]], 
      "None"]}]}]}]}]], "Subsubtitle",
 CellDingbat->None,
 CellChangeTimes->{
  3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
   3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9, 
   3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9, 
   3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9}, 
   3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9}, 
   3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9, 
   3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
   3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9, 
   3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
   3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9, 
   3.519247079685614*^9, {3.5193208582062006`*^9, 3.5193208612170057`*^9}, 
   3.5193325694253187`*^9, {3.5193422443984776`*^9, 3.5193422447260776`*^9}, 
   3.5193424488212357`*^9, {3.5193434708254333`*^9, 3.519343473103037*^9}, {
   3.5193435097631016`*^9, 3.51934353169674*^9}, {3.519345739319023*^9, 
   3.519345739599823*^9}, 3.5193462601259375`*^9, {3.5193475061060295`*^9, 
   3.5193475233908596`*^9}, {3.519351391880224*^9, 3.5193513931402254`*^9}, {
   3.519403773021052*^9, 3.5194037798564425`*^9}, 3.5194106793250647`*^9, {
   3.519537578341393*^9, 3.5195375792305946`*^9}, {3.5195376277778797`*^9, 
   3.51953767927357*^9}, {3.5197586260636144`*^9, 3.5197586260636144`*^9}, {
   3.51978053295651*^9, 3.519780542862528*^9}, {3.5197806526087203`*^9, 
   3.5197806657595434`*^9}, {3.5197807490168896`*^9, 3.5197807642581167`*^9}, 
   3.5197809004619555`*^9, {3.519782653514635*^9, 3.5197826623286505`*^9}, {
   3.5200207810164795`*^9, 3.520020785046485*^9}, {3.5213126833374643`*^9, 
   3.5213126833374643`*^9}, {3.521328235411002*^9, 3.521328235411002*^9}, {
   3.523315567893022*^9, 3.523315567893022*^9}, {3.5233157569332867`*^9, 
   3.5233157613032923`*^9}, {3.5323023198133526`*^9, 3.532302355723403*^9}, {
   3.5323026417638035`*^9, 3.5323026417638035`*^9}, {3.5323026980138817`*^9, 
   3.5323026980138817`*^9}, {3.532636287104328*^9, 3.532636287104328*^9}, {
   3.5330803686035347`*^9, 3.533080368863535*^9}, {3.533248909289961*^9, 
   3.5332489110299635`*^9}, {3.534962469565694*^9, 3.5349624910757236`*^9}, {
   3.5349625224057674`*^9, 3.534962522655768*^9}, {3.534965265519608*^9, 
   3.534965265519608*^9}, {3.5349668288168063`*^9, 3.5349668292668066`*^9}, {
   3.5349747358481646`*^9, 3.5349747358481646`*^9}, {3.534975457949176*^9, 
   3.534975457949176*^9}, {3.5368633963532934`*^9, 3.536863396571694*^9}, {
   3.541644322511304*^9, 3.5416443577513533`*^9}, {3.5416458269234104`*^9, 
   3.541645839633428*^9}, {3.5416460312236967`*^9, 3.541646031483697*^9}, 
   3.541646227783972*^9, {3.541647080335165*^9, 3.5416471077052035`*^9}, {
   3.541648997607849*^9, 3.5416489978278494`*^9}, 3.541649088407976*^9, {
   3.5417848711596775`*^9, 3.541784902429721*^9}, {3.541786145331461*^9, 
   3.5417861455914617`*^9}, {3.5417870037166634`*^9, 3.5417870039366636`*^9}, 
   3.5462979620242105`*^9, {3.546298264094633*^9, 3.546298265344635*^9}, {
   3.546299000235664*^9, 3.546299001505666*^9}, {3.546315119909564*^9, 
   3.5463151267659564`*^9}, {3.547227356319705*^9, 3.547227356319705*^9}, 
   3.547918559331044*^9, {3.547918610170952*^9, 3.5479186304411116`*^9}, 
   3.548537755517557*^9, 3.5485441629685287`*^9, 3.5485517520154133`*^9, {
   3.5488740727887154`*^9, 3.5488740727887154`*^9}, {3.548874206618903*^9, 
   3.548874206808903*^9}, 3.548877100795455*^9, 3.550596464087599*^9, {
   3.5505965767870445`*^9, 3.5505965767870445`*^9}, 3.5505966202465305`*^9, {
   3.5506039138305197`*^9, 3.55060391400453*^9}, {3.5506040039986773`*^9, 
   3.550604005776779*^9}, {3.5506178888272758`*^9, 3.5506178900273447`*^9}, {
   3.550770598144562*^9, 3.550770659629079*^9}, {3.5507707252908344`*^9, 
   3.5507707474461017`*^9}, 3.5507880023630266`*^9, {3.5508017696214375`*^9, 
   3.5508017788269644`*^9}, {3.5508018116158395`*^9, 3.5508018116158395`*^9}, 
   3.5508018976437597`*^9, {3.5508021384015307`*^9, 3.550802155115487*^9}, {
   3.5508022151019173`*^9, 3.5508022151019173`*^9}, {3.550802487106476*^9, 
   3.5508025179152374`*^9}, {3.5508029261175857`*^9, 
   3.5508029342300496`*^9}, {3.5521511708590136`*^9, 3.5521511712334137`*^9}, 
   3.552151666269083*^9, {3.5535324250863676`*^9, 3.553532441643315*^9}, {
   3.553532476791325*^9, 3.553532477502366*^9}, {3.5535325810722895`*^9, 
   3.5535325810722895`*^9}, {3.553534924419321*^9, 3.5535349316017323`*^9}, {
   3.5535606916294093`*^9, 3.553560715209442*^9}, {3.553560906999711*^9, 
   3.553560912889719*^9}, {3.5535610183798666`*^9, 3.5535610197098684`*^9}, {
   3.553561508580553*^9, 3.553561525080576*^9}, {3.5535615930406713`*^9, 
   3.5535616035406857`*^9}, {3.554910910997098*^9, 3.554910915757105*^9}, {
   3.5549117484282703`*^9, 3.5549117605482874`*^9}, {3.554912730909646*^9, 
   3.5549127360396533`*^9}, {3.5549136721909637`*^9, 3.5549136721909637`*^9}, 
   3.554914986132803*^9, {3.5549163241346765`*^9, 3.5549163243246765`*^9}, {
   3.5549164278148212`*^9, 3.554916428034822*^9}, {3.5549327039364157`*^9, 
   3.5549327054764185`*^9}, 3.5551920407462616`*^9, {3.555250957523697*^9, 
   3.5552509591772995`*^9}, {3.555252683307928*^9, 3.555252683510728*^9}, 
   3.5853498582910423`*^9, 3.5853508165523834`*^9, {3.5853518656263523`*^9, 
   3.5853518674363546`*^9}, 3.5861901481930447`*^9, 3.5863642524534893`*^9, {
   3.586968219253298*^9, 3.586968219253298*^9}, 3.586968958261863*^9, {
   3.5869708508560925`*^9, 3.5869708836661396`*^9}, 3.5869851842914906`*^9, {
   3.5869884306060896`*^9, 3.5869884306060896`*^9}, {3.586991203969972*^9, 
   3.586991204529973*^9}, {3.586991582290502*^9, 3.5869915824905024`*^9}, {
   3.5870773806800413`*^9, 3.587077381370043*^9}, 3.6201579387583275`*^9, 
   3.6202686266178327`*^9, {3.671215092923464*^9, 3.6712151153117447`*^9}, 
   3.6712151890059595`*^9, 3.6712154955794945`*^9, {3.6712157000131874`*^9, 
   3.6712157000131874`*^9}, {3.671215923205953*^9, 3.6712159242560134`*^9}, {
   3.671243742061079*^9, 3.6712437422580905`*^9}, 3.6713793006069083`*^9},
 FontSize->12,
 FontWeight->"Bold"],

Cell["Derivation: Integration by substitution", "Subsubsection",
 CellChangeTimes->{3.4941724567488375`*^9, 3.494172818179343*^9}],

Cell[TextData[{
 "Basis: ",
 Cell[BoxData[Cell[TextData[Cell[BoxData[
   RowBox[{
    RowBox[{"F", "[", "x", "]"}], "\[Equal]", 
    RowBox[{
     FractionBox["1", 
      RowBox[{"b", " ", "c"}]], " ", 
     RowBox[{"Subst", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"F", "[", 
         FractionBox[
          RowBox[{"Sinh", "[", 
           RowBox[{
            RowBox[{"-", 
             FractionBox["a", "b"]}], "+", 
            FractionBox["x", "b"]}], "]"}], "c"], "]"}], " ", 
        RowBox[{"Cosh", "[", 
         RowBox[{
          RowBox[{"-", 
           FractionBox["a", "b"]}], "+", 
          FractionBox["x", "b"]}], "]"}]}], ",", "x", ",", 
       RowBox[{"a", "+", 
        RowBox[{"b", " ", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c", " ", "x"}], "]"}]}]}]}], "]"}], " ", 
     RowBox[{
      SubscriptBox["\[PartialD]", "x"], 
      RowBox[{"(", 
       RowBox[{"a", "+", 
        RowBox[{"b", " ", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}]}]}]}]]]], "Subsubsection",
   CellChangeTimes->{
    3.4941724567488375`*^9, {3.494172818179343*^9, 3.494172835289367*^9}, 
     3.4941728817394323`*^9, {3.4941732517099504`*^9, 
     3.4941732592199607`*^9}}]]]
}], "Subsubsection",
 CellChangeTimes->{
  3.4941724567488375`*^9, {3.494172818179343*^9, 3.494172835289367*^9}, 
   3.4941728817394323`*^9, {3.4941732517099504`*^9, 3.4941732592199607`*^9}, {
   3.4941867403328547`*^9, 3.494186750597673*^9}, {3.494188482910461*^9, 
   3.494188485702866*^9}, 3.494188591549052*^9, {3.49418864176554*^9, 
   3.49418864750635*^9}, {3.4941887057880526`*^9, 3.494188733883702*^9}, {
   3.494189069767892*^9, 3.4941891152419715`*^9}, {3.494198042823061*^9, 
   3.494198045428265*^9}, {3.494198409922906*^9, 3.4941984537277822`*^9}, {
   3.5535615479506083`*^9, 3.5535615486606092`*^9}, {3.5547639257484975`*^9, 
   3.5547639270120993`*^9}, {3.55476401825666*^9, 3.5547640247930717`*^9}, {
   3.554764072388755*^9, 3.5547640843851757`*^9}, {3.5853498574610405`*^9, 
   3.5853498574710407`*^9}, {3.5861901475530434`*^9, 
   3.5861901475630436`*^9}, {3.586190522363569*^9, 3.586190522363569*^9}, {
   3.5868101092330537`*^9, 3.5868101236630793`*^9}, {3.751308078540713*^9, 
   3.7513080802108083`*^9}, {3.7513082472483625`*^9, 
   3.7513082472483625`*^9}, {3.7513085995845146`*^9, 
   3.7513085995845146`*^9}, {3.751308631280328*^9, 3.751308631280328*^9}, {
   3.7528802866133833`*^9, 3.7528802866133833`*^9}, {3.752880427824831*^9, 
   3.752880427824831*^9}, {3.7529740633378267`*^9, 3.7529740633378267`*^9}, {
   3.7534561966085215`*^9, 3.7534561966085215`*^9}}],

Cell[TextData[{
 "Note: If  ",
 Cell[BoxData[
  RowBox[{"m", "\[Element]", 
   SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}]],
  CellDingbat->None,
  CellChangeTimes->{{3.48029928226497*^9, 3.4802993300937443`*^9}, 
    3.4802995783907776`*^9, {3.480299703450605*^9, 3.480299715728259*^9}, 
    3.4940008741337056`*^9, {3.4940431424186068`*^9, 3.4940431752074823`*^9}, 
    3.494179334790743*^9, 3.494179491443018*^9, 3.4941795557463307`*^9, {
    3.574189878827594*^9, 3.574190046855489*^9}, {3.574192782465788*^9, 
    3.574192790025798*^9}, 3.575152963141556*^9, {3.5751530122416244`*^9, 
    3.5751530509716787`*^9}, {3.5852449507858477`*^9, 
    3.5852449570158563`*^9}, {3.585245029475958*^9, 3.585245034075964*^9}, 
    3.5852450921760454`*^9, 3.5852451743536606`*^9, {3.585245412821495*^9, 
    3.5852454135114956`*^9}, 3.585245513169135*^9, 3.5861955511088343`*^9, {
    3.5861956652490025`*^9, 3.586195667009005*^9}, {3.5861957574916415`*^9, 
    3.5861957575016413`*^9}, {3.5861958258292427`*^9, 3.586195826309243*^9}, 
    3.5861960884846354`*^9, 3.586196200064803*^9, {3.586196337540013*^9, 
    3.5861963424075203`*^9}},
  TextAlignment->Center,
  FontSize->12,
  FontWeight->"Bold"],
 ", then ",
 Cell[BoxData[
  RowBox[{
   SuperscriptBox["x", "n"], " ", 
   SuperscriptBox[
    RowBox[{"Sinh", "[", 
     RowBox[{
      RowBox[{"-", 
       FractionBox["a", "b"]}], "+", 
      FractionBox["x", "b"]}], "]"}], "m"], " ", 
   RowBox[{"Cosh", "[", 
    RowBox[{
     RowBox[{"-", 
      FractionBox["a", "b"]}], "+", 
     FractionBox["x", "b"]}], "]"}]}]],
  CellDingbat->None,
  CellChangeTimes->{{3.4796579732027807`*^9, 3.479658002474872*^9}, {
    3.4796580599975853`*^9, 3.4796580609489536`*^9}, {3.479658295195784*^9, 
    3.47965829684816*^9}, 3.4796611938939075`*^9, 3.4796613924794593`*^9, {
    3.479661443342597*^9, 3.479661446647349*^9}, {3.479661576554146*^9, 
    3.479661589302477*^9}, 3.479661847553824*^9, {3.4796622294729967`*^9, 
    3.4796622450654173`*^9}, {3.479686720424531*^9, 3.4796867204345455`*^9}, {
    3.4796874646646957`*^9, 3.4796874745589232`*^9}, {3.492826573513727*^9, 
    3.492826578630536*^9}, {3.4928267070863624`*^9, 3.492826707460763*^9}, 
    3.4928267903497095`*^9, {3.492829799151373*^9, 3.4928299617216005`*^9}, {
    3.4940972077187414`*^9, 3.4940972347887793`*^9}, {3.49409966398218*^9, 
    3.494099664952181*^9}, {3.4940997156722527`*^9, 3.494099716112253*^9}, 
    3.4941724567488375`*^9, {3.4941727384192314`*^9, 3.494172760679263*^9}, {
    3.4941763955899596`*^9, 3.4941764290900064`*^9}, {3.4941764605500507`*^9, 
    3.4941764930400963`*^9}, 3.4941770641708956`*^9, 3.494177118590972*^9, {
    3.4941890257602143`*^9, 3.4941890417814426`*^9}, {3.494189320351132*^9, 
    3.4941893689764175`*^9}, {3.4941960634447823`*^9, 3.494196109948464*^9}, {
    3.494196492625537*^9, 3.4941965253075943`*^9}, {3.4941967717568274`*^9, 
    3.4941967891820583`*^9}, {3.494198824027233*^9, 3.4941988799065313`*^9}, {
    3.5549115691980195`*^9, 3.5549115968580585`*^9}, {3.554912582239438*^9, 
    3.5549126668695564`*^9}, {3.5549164354848323`*^9, 3.554916460314867*^9}, {
    3.554916561565009*^9, 3.5549165719750233`*^9}, {3.5853498583310423`*^9, 
    3.5853498583310423`*^9}, 3.585350816572384*^9, {3.5853519065864096`*^9, 
    3.5853519087964125`*^9}, {3.5861901482330446`*^9, 3.5861901482330446`*^9},
     3.586190724633852*^9, {3.586968096958122*^9, 3.586968185123249*^9}, {
    3.586985186366493*^9, 3.5869852059365215`*^9}, {3.5869869891440716`*^9, 
    3.5869869898240724`*^9}, {3.6712151365629597`*^9, 
    3.6712151419592686`*^9}, {3.671215192911183*^9, 3.671215201580679*^9}, {
    3.6712154006240635`*^9, 3.6712154056103487`*^9}, 3.6712155011038103`*^9},
  TextAlignment->Center,
  FontSize->12,
  FontWeight->"Bold"],
 " is integrable in closed-form. "
}], "Subsubsection",
 CellDingbat->"\[FilledSmallSquare]",
 CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
   3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9, 
   3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9, 
   3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
   3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9, 
   3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9, 
   3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9}, 
   3.48070534977779*^9, {3.4928296953212276`*^9, 3.492829707041244*^9}, 
   3.4941724084687696`*^9, 3.4941724567488375`*^9, {3.4941737492506466`*^9, 
   3.4941737506706486`*^9}, {3.494173966810951*^9, 3.494174007671008*^9}, {
   3.4941741326011834`*^9, 3.4941741425911975`*^9}, {3.4941767936905165`*^9, 
   3.494176809630539*^9}, {3.4941773316412697`*^9, 3.494177333751273*^9}, {
   3.4941781299723873`*^9, 3.494178211092501*^9}, {3.494178252592559*^9, 
   3.4941782798925977`*^9}, {3.49417832450266*^9, 3.494178365332717*^9}, {
   3.4941785870814295`*^9, 3.4941785879394307`*^9}, {3.4941796318276644`*^9, 
   3.4941796418116817`*^9}, 3.574190021318244*^9, {3.574190199236556*^9, 
   3.574190206599769*^9}, {3.586718323140966*^9, 3.586718344360996*^9}, {
   3.5867184410511312`*^9, 3.586718469371171*^9}, {3.586718741191551*^9, 
   3.586718773781597*^9}, {3.58697075179595*^9, 3.5869707777309875`*^9}, {
   3.5869853577967405`*^9, 3.5869853577967405`*^9}, {3.5869870050640936`*^9, 
   3.586987005464094*^9}, {3.58698840977606*^9, 3.586988418726073*^9}, {
   3.5870773847900476`*^9, 3.5870773857850494`*^9}, {3.671215132559731*^9, 
   3.671215132773743*^9}, {3.671215220328751*^9, 3.671215220328751*^9}, {
   3.6712155133935137`*^9, 3.671215543881257*^9}, {3.671215959036003*^9, 
   3.671215959036003*^9}, {3.6713809831417217`*^9, 3.6713809831417217`*^9}, {
   3.7529743118150625`*^9, 3.7529743118150625`*^9}, {3.7534562036597342`*^9, 
   3.7534562056877375`*^9}}],

Cell[TextData[{
 "Rule: If  ",
 Cell[BoxData[
  RowBox[{"m", "\[Element]", 
   SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}]]],
 ", then"
}], "Subsubsection",
 CellDingbat->"\[FilledSmallSquare]",
 CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
   3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9, 
   3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9, 
   3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
   3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9, 
   3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9, 
   3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9}, 
   3.48070534977779*^9, {3.4928296953212276`*^9, 3.492829707041244*^9}, 
   3.4941724084687696`*^9, 3.4941724567488375`*^9, {3.4941737492506466`*^9, 
   3.4941737506706486`*^9}, {3.494173966810951*^9, 3.494174007671008*^9}, {
   3.4941741326011834`*^9, 3.4941741425911975`*^9}, {3.4941767936905165`*^9, 
   3.494176809630539*^9}, {3.4941773316412697`*^9, 3.494177333751273*^9}, {
   3.4941891756608777`*^9, 3.494189178765283*^9}, {3.494196711119521*^9, 
   3.4941967113535213`*^9}, {3.4941972738717093`*^9, 
   3.4941972799089203`*^9}, {3.49420053403185*^9, 3.494200549361871*^9}, {
   3.5549127564596815`*^9, 3.5549127564596815`*^9}, {3.554913675900969*^9, 
   3.554913675900969*^9}, {3.5549163276946816`*^9, 3.5549163278646812`*^9}, {
   3.5549327082264223`*^9, 3.554932709466424*^9}, {3.5869682224733024`*^9, 
   3.5869682224733024`*^9}, {3.5869708901711493`*^9, 
   3.5869708901711493`*^9}, {3.5869884329060926`*^9, 
   3.5869884329060926`*^9}, {3.5870773885100527`*^9, 3.587077389110054*^9}, {
   3.671215957102892*^9, 3.671215957102892*^9}}],

Cell[BoxData[
 RowBox[{"\[Integral]", 
  RowBox[{
   SuperscriptBox["x", "m"], " ", 
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{"a", "+", 
      RowBox[{"b", " ", 
       RowBox[{"ArcSinh", "[", 
        RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], 
   RowBox[{"\[DifferentialD]", 
    RowBox[{"x", "  ", "\[LongRightArrow]", "  ", 
     FractionBox["1", 
      RowBox[{"b", " ", 
       SuperscriptBox["c", 
        RowBox[{"m", "+", "1"}]]}]]}]}], " ", 
   RowBox[{"Subst", "[", 
    RowBox[{
     RowBox[{"\[Integral]", 
      RowBox[{
       SuperscriptBox["x", "n"], " ", 
       SuperscriptBox[
        RowBox[{"Sinh", "[", 
         RowBox[{
          RowBox[{"-", 
           FractionBox["a", "b"]}], "+", 
          FractionBox["x", "b"]}], "]"}], "m"], " ", 
       RowBox[{"Cosh", "[", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["a", "b"]}], "+", 
         FractionBox["x", "b"]}], "]"}], 
       RowBox[{"\[DifferentialD]", "x"}]}]}], ",", "x", ",", 
     RowBox[{"a", "+", 
      RowBox[{"b", " ", 
       RowBox[{"ArcSinh", "[", 
        RowBox[{"c", " ", "x"}], "]"}]}]}]}], "]"}]}]}]], "Subsubtitle",
 CellDingbat->None,
 CellChangeTimes->{{3.4796579732027807`*^9, 3.479658002474872*^9}, {
   3.4796580599975853`*^9, 3.4796580609489536`*^9}, {3.479658295195784*^9, 
   3.47965829684816*^9}, 3.4796611938939075`*^9, 3.4796613924794593`*^9, {
   3.479661443342597*^9, 3.479661446647349*^9}, {3.479661576554146*^9, 
   3.479661589302477*^9}, 3.479661847553824*^9, {3.4796622294729967`*^9, 
   3.4796622450654173`*^9}, {3.479686720424531*^9, 3.4796867204345455`*^9}, {
   3.4796874646646957`*^9, 3.4796874745589232`*^9}, {3.492826573513727*^9, 
   3.492826578630536*^9}, {3.4928267070863624`*^9, 3.492826707460763*^9}, 
   3.4928267903497095`*^9, {3.492829799151373*^9, 3.4928299617216005`*^9}, {
   3.4940972077187414`*^9, 3.4940972347887793`*^9}, {3.49409966398218*^9, 
   3.494099664952181*^9}, {3.4940997156722527`*^9, 3.494099716112253*^9}, 
   3.4941724567488375`*^9, {3.4941727384192314`*^9, 3.494172760679263*^9}, {
   3.4941763955899596`*^9, 3.4941764290900064`*^9}, {3.4941764605500507`*^9, 
   3.4941764930400963`*^9}, 3.4941770641708956`*^9, 3.494177118590972*^9, {
   3.4941890257602143`*^9, 3.4941890417814426`*^9}, {3.494189320351132*^9, 
   3.4941893689764175`*^9}, {3.4941960634447823`*^9, 3.494196109948464*^9}, {
   3.494196492625537*^9, 3.4941965253075943`*^9}, {3.4941967717568274`*^9, 
   3.4941967891820583`*^9}, {3.494198824027233*^9, 3.4941988799065313`*^9}, {
   3.5549115691980195`*^9, 3.5549115968580585`*^9}, {3.554912582239438*^9, 
   3.5549126668695564`*^9}, {3.5549164354848323`*^9, 3.554916460314867*^9}, {
   3.554916561565009*^9, 3.5549165719750233`*^9}, {3.5853498583310423`*^9, 
   3.5853498583310423`*^9}, 3.585350816572384*^9, {3.5853519065864096`*^9, 
   3.5853519087964125`*^9}, {3.5861901482330446`*^9, 3.5861901482330446`*^9}, 
   3.586190724633852*^9, {3.586968096958122*^9, 3.586968185123249*^9}, {
   3.586985186366493*^9, 3.5869852059365215`*^9}, {3.5869869891440716`*^9, 
   3.5869869898240724`*^9}, {3.6712151365629597`*^9, 
   3.6712151419592686`*^9}, {3.671215192911183*^9, 3.671215201580679*^9}, {
   3.6712154006240635`*^9, 3.6712154056103487`*^9}, 3.6712155011038103`*^9, {
   3.6713793006537085`*^9, 3.6713793006537085`*^9}, {3.671380952624068*^9, 
   3.6713809542464705`*^9}, {3.7529740880482697`*^9, 
   3.7529741320091467`*^9}, {3.7534562079029417`*^9, 3.753456213799752*^9}},
 TextAlignment->Center,
 FontSize->12,
 FontWeight->"Bold"],

Cell["Program code:", "Subsubsection",
 CellDingbat->"\[FilledSmallSquare]",
 CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
   3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9, 
   3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9, 
   3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
   3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9, 
   3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9, 
   3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9}, 
   3.4807050675119123`*^9, {3.492804314166378*^9, 3.4928043441496305`*^9}, {
   3.4928044532166224`*^9, 3.492804453513023*^9}, {3.492805162266266*^9, 
   3.492805165713872*^9}, 3.4941724567488375`*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"Int", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"x_", "^", "m_."}], "*", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{"a_.", "+", 
        RowBox[{"b_.", "*", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c_.", "*", "x_"}], "]"}]}]}], ")"}], "^", "n_"}]}], ",", 
    "x_Symbol"}], "]"}], " ", ":=", "\n", "  ", 
  RowBox[{
   RowBox[{
    RowBox[{"1", "/", 
     RowBox[{"(", 
      RowBox[{"b", "*", 
       RowBox[{"c", "^", 
        RowBox[{"(", 
         RowBox[{"m", "+", "1"}], ")"}]}]}], ")"}]}], "*", 
    RowBox[{"Subst", "[", 
     RowBox[{
      RowBox[{"Int", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"x", "^", "n"}], "*", 
         RowBox[{
          RowBox[{"Sinh", "[", 
           RowBox[{
            RowBox[{
             RowBox[{"-", "a"}], "/", "b"}], "+", 
            RowBox[{"x", "/", "b"}]}], "]"}], "^", "m"}], "*", 
         RowBox[{"Cosh", "[", 
          RowBox[{
           RowBox[{
            RowBox[{"-", "a"}], "/", "b"}], "+", 
           RowBox[{"x", "/", "b"}]}], "]"}]}], ",", "x"}], "]"}], ",", "x", 
      ",", 
      RowBox[{"a", "+", 
       RowBox[{"b", "*", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", "*", "x"}], "]"}]}]}]}], "]"}]}], " ", "/;", "\n", 
   RowBox[{
    RowBox[{"FreeQ", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"a", ",", "b", ",", "c", ",", "n"}], "}"}], ",", "x"}], "]"}], 
    " ", "&&", " ", 
    RowBox[{"IGtQ", "[", 
     RowBox[{"m", ",", "0"}], "]"}]}]}]}]], "Code",
 CellChangeTimes->{{3.494097279728842*^9, 3.494097309778884*^9}, {
   3.494099665582182*^9, 3.4940996672021847`*^9}, {3.4940997193022575`*^9, 
   3.494099719662258*^9}, 3.4941724567488375`*^9, 3.494172717389202*^9, {
   3.4941763709899254`*^9, 3.49417638178994*^9}, 3.494176933060712*^9, {
   3.4941891975165157`*^9, 3.494189292692283*^9}, 3.4941894111744914`*^9, {
   3.4941961386609154`*^9, 3.494196199048621*^9}, 3.4941962310130777`*^9, {
   3.494196685551076*^9, 3.494196749355188*^9}, {3.494196855996975*^9, 
   3.494196887758631*^9}, {3.494197244138057*^9, 3.494197246946062*^9}, {
   3.494197819524268*^9, 3.4941978307718887`*^9}, {3.4941989675474854`*^9, 
   3.4941989999331427`*^9}, {3.494200557901883*^9, 3.4942005644018917`*^9}, {
   3.553560008788453*^9, 3.5535600110784564`*^9}, {3.554912771049702*^9, 
   3.554912814569763*^9}, 3.554912888029866*^9, {3.554916331074686*^9, 
   3.5549163312646866`*^9}, 3.5549164666348763`*^9, {3.5549166092250757`*^9, 
   3.5549166341951103`*^9}, 3.5549275597684135`*^9, {3.554932694456403*^9, 
   3.554932695816405*^9}, 3.554932822566582*^9, {3.554933326157287*^9, 
   3.554933340167307*^9}, 3.585349881911075*^9, 3.5853501078513913`*^9, 
   3.585350151621453*^9, 3.5853508903124866`*^9, 3.585351282413036*^9, {
   3.585352008146552*^9, 3.585352010226555*^9}, 3.5861902275831556`*^9, 
   3.586190276733225*^9, {3.5861907282838573`*^9, 3.586190728873858*^9}, 
   3.5869682634208612`*^9, {3.5869683181009398`*^9, 3.586968324595949*^9}, {
   3.586968439478614*^9, 3.5869684496486287`*^9}, 3.5869697850620594`*^9, {
   3.5869701425625734`*^9, 3.5869701521475873`*^9}, {3.5869702086776686`*^9, 
   3.586970234562706*^9}, {3.5869702875227823`*^9, 3.5869702968127956`*^9}, {
   3.5869704908780746`*^9, 3.5869705133931065`*^9}, {3.5869708000960197`*^9, 
   3.586970808086031*^9}, {3.5869852813566303`*^9, 3.586985318656684*^9}, {
   3.5869870236141195`*^9, 3.58698702395412*^9}, {3.586988063855576*^9, 
   3.586988074335591*^9}, {3.5870773925600586`*^9, 3.58707739339006*^9}, {
   3.67121514688155*^9, 3.6712151558600636`*^9}, {3.671215242188001*^9, 
   3.6712152593559833`*^9}, {3.6712154513769665`*^9, 
   3.6712154533350782`*^9}, {3.671215972565777*^9, 3.6712159751869264`*^9}, 
   3.671244142671993*^9, {3.6713793006693087`*^9, 3.6713793006693087`*^9}, {
   3.671381002174755*^9, 3.6713810034695573`*^9}, 3.7152179517832537`*^9, {
   3.752974191741652*^9, 3.7529741937540555`*^9}, {3.752974237465332*^9, 
   3.752974267947786*^9}, {3.7534561359088154`*^9, 3.7534561571872525`*^9}},
 Background->GrayLevel[0.85]],

Cell["", "Subsubsection",
 CellDingbat->None,
 CellChangeTimes->{3.4796643211106243`*^9, 3.4941724567488375`*^9}]
}, Closed]]
}, Closed]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{Cell[TextData[StyleBox["U:",
   FontFamily->"Arial",
   FontColor->RGBColor[1, 0, 0]]], "None"], "  ", 
  RowBox[{"\[Integral]", 
   RowBox[{
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"d", " ", "x"}], ")"}], "m"], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"a", "+", 
       RowBox[{"b", " ", 
        RowBox[{"ArcSinh", "[", 
         RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], 
    RowBox[{"\[DifferentialD]", "x"}]}]}]}]], "Subsubtitle",
 CellDingbat->None,
 CellChangeTimes->{
  3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
   3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9, 
   3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9, 
   3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9}, 
   3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9}, 
   3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9, 
   3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
   3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9, 
   3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
   3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9, 
   3.519247079685614*^9, {3.5193208582062006`*^9, 3.5193208612170057`*^9}, 
   3.5193325694253187`*^9, {3.5193422443984776`*^9, 3.5193422447260776`*^9}, 
   3.5193424488212357`*^9, {3.5193434708254333`*^9, 3.519343473103037*^9}, {
   3.5193435097631016`*^9, 3.51934353169674*^9}, {3.519345739319023*^9, 
   3.519345739599823*^9}, 3.5193462601259375`*^9, {3.5193475061060295`*^9, 
   3.5193475233908596`*^9}, {3.519351391880224*^9, 3.5193513931402254`*^9}, {
   3.519403773021052*^9, 3.5194037798564425`*^9}, 3.5194106793250647`*^9, {
   3.519537578341393*^9, 3.5195375792305946`*^9}, {3.5195376277778797`*^9, 
   3.51953767927357*^9}, {3.5197586260636144`*^9, 3.5197586260636144`*^9}, {
   3.51978053295651*^9, 3.519780542862528*^9}, {3.5197806526087203`*^9, 
   3.5197806657595434`*^9}, {3.5197807490168896`*^9, 3.5197807642581167`*^9}, 
   3.5197809004619555`*^9, {3.519782653514635*^9, 3.5197826623286505`*^9}, {
   3.5200207810164795`*^9, 3.520020785046485*^9}, {3.5213126833374643`*^9, 
   3.5213126833374643`*^9}, {3.521328235411002*^9, 3.521328235411002*^9}, {
   3.523315567893022*^9, 3.523315567893022*^9}, {3.5233157569332867`*^9, 
   3.5233157613032923`*^9}, {3.5323023198133526`*^9, 3.532302355723403*^9}, {
   3.5323026417638035`*^9, 3.5323026417638035`*^9}, {3.5323026980138817`*^9, 
   3.5323026980138817`*^9}, {3.532636287104328*^9, 3.532636287104328*^9}, {
   3.5330803686035347`*^9, 3.533080368863535*^9}, {3.533248909289961*^9, 
   3.5332489110299635`*^9}, {3.534962469565694*^9, 3.5349624910757236`*^9}, {
   3.5349625224057674`*^9, 3.534962522655768*^9}, {3.534965265519608*^9, 
   3.534965265519608*^9}, {3.5349668288168063`*^9, 3.5349668292668066`*^9}, {
   3.5349747358481646`*^9, 3.5349747358481646`*^9}, {3.534975457949176*^9, 
   3.534975457949176*^9}, {3.5368633963532934`*^9, 3.536863396571694*^9}, {
   3.541644322511304*^9, 3.5416443577513533`*^9}, {3.5416458269234104`*^9, 
   3.541645839633428*^9}, {3.5416460312236967`*^9, 3.541646031483697*^9}, 
   3.541646227783972*^9, {3.541647080335165*^9, 3.5416471077052035`*^9}, {
   3.541648997607849*^9, 3.5416489978278494`*^9}, 3.541649088407976*^9, {
   3.5417848711596775`*^9, 3.541784902429721*^9}, {3.541786145331461*^9, 
   3.5417861455914617`*^9}, {3.5417870037166634`*^9, 3.5417870039366636`*^9}, 
   3.5462979620242105`*^9, {3.546298264094633*^9, 3.546298265344635*^9}, {
   3.546299000235664*^9, 3.546299001505666*^9}, {3.546315119909564*^9, 
   3.5463151267659564`*^9}, {3.547227356319705*^9, 3.547227356319705*^9}, 
   3.547918559331044*^9, {3.547918610170952*^9, 3.5479186304411116`*^9}, 
   3.548537755517557*^9, 3.5485441629685287`*^9, 3.5485517520154133`*^9, {
   3.5488740727887154`*^9, 3.5488740727887154`*^9}, {3.548874206618903*^9, 
   3.548874206808903*^9}, 3.548877100795455*^9, 3.550596464087599*^9, {
   3.5505965767870445`*^9, 3.5505965767870445`*^9}, 3.5505966202465305`*^9, {
   3.5506039138305197`*^9, 3.55060391400453*^9}, {3.5506040039986773`*^9, 
   3.550604005776779*^9}, {3.5506178888272758`*^9, 3.5506178900273447`*^9}, {
   3.550770598144562*^9, 3.550770659629079*^9}, {3.5507707252908344`*^9, 
   3.5507707474461017`*^9}, 3.5507880023630266`*^9, {3.5508017696214375`*^9, 
   3.5508017788269644`*^9}, {3.5508018116158395`*^9, 3.5508018116158395`*^9}, 
   3.5508018976437597`*^9, {3.5508021384015307`*^9, 3.550802155115487*^9}, {
   3.5508022151019173`*^9, 3.5508022151019173`*^9}, {3.550802487106476*^9, 
   3.5508025179152374`*^9}, {3.5508029261175857`*^9, 
   3.5508029342300496`*^9}, {3.5521511708590136`*^9, 3.5521511712334137`*^9}, 
   3.552151666269083*^9, {3.5535324250863676`*^9, 3.553532441643315*^9}, {
   3.553532476791325*^9, 3.553532477502366*^9}, 3.553532677104782*^9, 
   3.553535197344932*^9, {3.55353551200593*^9, 3.5535355292779174`*^9}, {
   3.553535652504881*^9, 3.5535356543924847`*^9}, {3.5549205830406413`*^9, 
   3.5549206114906807`*^9}, {3.5549308888338747`*^9, 
   3.5549309083539023`*^9}, {3.554931435854641*^9, 3.554931436064641*^9}, {
   3.5549322334657574`*^9, 3.5549322565857897`*^9}, {3.5549353682701464`*^9, 
   3.554935391020178*^9}, {3.554935426840228*^9, 3.5549354282902303`*^9}, {
   3.555033837273942*^9, 3.5550338379339433`*^9}, 3.555192038926259*^9, {
   3.5551954393656588`*^9, 3.555195441485662*^9}, {3.5551955518058167`*^9, 
   3.555195552035817*^9}, {3.5551955952058773`*^9, 3.5551956072558937`*^9}, {
   3.55519569731602*^9, 3.5551956975160203`*^9}, {3.555197194648116*^9, 
   3.55519719743812*^9}, {3.555197458228485*^9, 3.555197458508486*^9}, {
   3.5551982658596163`*^9, 3.555198269569621*^9}, {3.555198307339674*^9, 
   3.5551983313897076`*^9}, 3.555198685780204*^9, 3.555199502471347*^9, {
   3.555199556311423*^9, 3.555199560941429*^9}, {3.5862111634281*^9, 
   3.586211167878106*^9}, {3.586211260588236*^9, 3.5862112607982364`*^9}, {
   3.5862125909651484`*^9, 3.5862125912001486`*^9}, 3.586310567668475*^9, {
   3.58631118917717*^9, 3.586311230937228*^9}, {3.5863112764972916`*^9, 
   3.5863112977073216`*^9}, {3.5863114974676013`*^9, 
   3.5863115313376484`*^9}, {3.58636380798805*^9, 3.5863638227330713`*^9}, {
   3.586364087333252*^9, 3.586364087333252*^9}, {3.586364300793558*^9, 
   3.586364303253562*^9}, {3.5863650862246857`*^9, 3.586365086404686*^9}, {
   3.5863685043246026`*^9, 3.586368505314604*^9}, 3.5863698894755964`*^9, {
   3.5863700758858643`*^9, 3.5863700758858643`*^9}, 3.586370376836297*^9, 
   3.5864022360215425`*^9, 3.620158004759103*^9, 3.620269039036422*^9, 
   3.6202724083201337`*^9, {3.6202724718377666`*^9, 3.6202724838614545`*^9}, 
   3.6202789800370145`*^9, 3.6204120511680503`*^9, {3.6204124473677115`*^9, 
   3.6204124473677115`*^9}, {3.620425093703041*^9, 3.620425093924053*^9}, {
   3.620425199044066*^9, 3.6204252097186766`*^9}, 3.620426321138246*^9, {
   3.6204263889121227`*^9, 3.6204263897281694`*^9}, {3.6204362235166297`*^9, 
   3.6204362235166297`*^9}, {3.671215492079294*^9, 3.671215492544321*^9}, {
   3.6712161840758743`*^9, 3.6712161852589417`*^9}, 3.6713793006849084`*^9, {
   3.7530505262012024`*^9, 3.7530505274492044`*^9}},
 FontSize->12,
 FontWeight->"Bold"],

Cell["Rule:", "Subsubsection",
 CellDingbat->"\[FilledSmallSquare]",
 CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
   3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9, 
   3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9, 
   3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
   3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9, 
   3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9, 
   3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9}, 
   3.48070534977779*^9, {3.4928296953212276`*^9, 3.492829707041244*^9}, 
   3.4941724084687696`*^9, 3.4941724567488375`*^9, {3.4941737492506466`*^9, 
   3.4941737506706486`*^9}, {3.494173966810951*^9, 3.494174007671008*^9}, {
   3.4941741326011834`*^9, 3.4941741425911975`*^9}, {3.4941767936905165`*^9, 
   3.494176809630539*^9}, {3.4941773316412697`*^9, 3.494177333751273*^9}, {
   3.4941781299723873`*^9, 3.494178211092501*^9}, {3.494178252592559*^9, 
   3.4941782798925977`*^9}, {3.49417832450266*^9, 3.494178365332717*^9}, {
   3.4941785870814295`*^9, 3.4941785879394307`*^9}, {3.4941796318276644`*^9, 
   3.4941796418116817`*^9}, 3.574190021318244*^9, {3.574192849995882*^9, 
   3.5741928922759414`*^9}, {3.5751545012537093`*^9, 
   3.5751545043237133`*^9}, {3.585245211903713*^9, 3.585245211903713*^9}, {
   3.5852452435437574`*^9, 3.5852452435437574`*^9}, {3.585245412231494*^9, 
   3.585245412231494*^9}, {3.586195550513833*^9, 3.586195550513833*^9}, {
   3.5861956641640005`*^9, 3.5861956646340017`*^9}, {3.586195914501872*^9, 
   3.586195914501872*^9}, {3.5864763444734287`*^9, 3.5864763444734287`*^9}, {
   3.620279052590164*^9, 3.620279052590164*^9}, {3.620412450116869*^9, 
   3.620412450116869*^9}, {3.620425110335992*^9, 3.620425110335992*^9}, 
   3.6204252223533993`*^9}],

Cell[BoxData[
 RowBox[{"\[Integral]", 
  RowBox[{
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{"d", " ", "x"}], ")"}], "m"], " ", 
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{"a", "+", 
      RowBox[{"b", " ", 
       RowBox[{"ArcSinh", "[", 
        RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], 
   RowBox[{"\[DifferentialD]", 
    RowBox[{"x", "  ", "\[LongRightArrow]", "  ", 
     RowBox[{"\[Integral]", 
      RowBox[{
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{"d", " ", "x"}], ")"}], "m"], " ", 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{"a", "+", 
          RowBox[{"b", " ", 
           RowBox[{"ArcSinh", "[", 
            RowBox[{"c", " ", "x"}], "]"}]}]}], ")"}], "n"], 
       RowBox[{"\[DifferentialD]", "x"}]}]}]}]}]}]}]], "Subsubtitle",
 CellDingbat->None,
 CellChangeTimes->{{3.4796579732027807`*^9, 3.479658002474872*^9}, {
   3.4796580599975853`*^9, 3.4796580609489536`*^9}, {3.479658295195784*^9, 
   3.47965829684816*^9}, 3.4796611938939075`*^9, 3.4796613924794593`*^9, {
   3.479661443342597*^9, 3.479661446647349*^9}, {3.479661576554146*^9, 
   3.479661589302477*^9}, 3.479661847553824*^9, {3.4796622294729967`*^9, 
   3.4796622450654173`*^9}, {3.479686720424531*^9, 3.4796867204345455`*^9}, {
   3.4796874646646957`*^9, 3.4796874745589232`*^9}, {3.492826573513727*^9, 
   3.492826578630536*^9}, {3.4928267070863624`*^9, 3.492826707460763*^9}, 
   3.4928267903497095`*^9, {3.492829799151373*^9, 3.4928299617216005`*^9}, {
   3.4940972077187414`*^9, 3.4940972347887793`*^9}, {3.49409966398218*^9, 
   3.494099664952181*^9}, {3.4940997156722527`*^9, 3.494099716112253*^9}, 
   3.4941724567488375`*^9, {3.4941727384192314`*^9, 3.494172760679263*^9}, {
   3.4941763955899596`*^9, 3.4941764290900064`*^9}, {3.4941764605500507`*^9, 
   3.4941764930400963`*^9}, {3.4941882372412295`*^9, 3.49418823769363*^9}, {
   3.4950421850198574`*^9, 3.4950422389399333`*^9}, {3.495045295774213*^9, 
   3.495045310274233*^9}, {3.4950453750643234`*^9, 3.4950453777743273`*^9}, {
   3.495045490884486*^9, 3.4950454957944927`*^9}, {3.553368718813157*^9, 
   3.553368809340116*^9}, {3.5549303571831307`*^9, 3.554930396443186*^9}, {
   3.554930437533243*^9, 3.5549304634232793`*^9}, 3.5549305254833665`*^9, {
   3.554930589243456*^9, 3.554930617493495*^9}, 3.55519821868955*^9, {
   3.555198257199604*^9, 3.5551982605596085`*^9}, {3.586310567684075*^9, 
   3.586310567684075*^9}, {3.586311243257245*^9, 3.586311245387248*^9}, {
   3.586311498107602*^9, 3.586311498617603*^9}, {3.586363808508051*^9, 
   3.586363824358073*^9}, {3.5863703104062014`*^9, 3.5863703138462067`*^9}, {
   3.5863703919063187`*^9, 3.586370393641321*^9}, {3.620272410658267*^9, 
   3.6202724125213737`*^9}, {3.6202724862065887`*^9, 3.620272489974804*^9}, {
   3.6204263528000565`*^9, 3.6204263596514487`*^9}, {3.6712161791215906`*^9, 
   3.67121618208076*^9}, {3.671379300700508*^9, 3.6713793007161083`*^9}},
 TextAlignment->Center,
 FontSize->12,
 FontWeight->"Bold"],

Cell["Program code:", "Subsubsection",
 CellDingbat->"\[FilledSmallSquare]",
 CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
   3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9, 
   3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9, 
   3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
   3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9, 
   3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9, 
   3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9}, 
   3.4807050675119123`*^9, {3.492804314166378*^9, 3.4928043441496305`*^9}, {
   3.4928044532166224`*^9, 3.492804453513023*^9}, {3.492805162266266*^9, 
   3.492805165713872*^9}, 3.4941724567488375`*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"Int", "[", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"(", 
       RowBox[{"d_.", "*", "x_"}], ")"}], "^", "m_."}], "*", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{"a_.", "+", 
        RowBox[{"b_.", "*", 
         RowBox[{"ArcSinh", "[", 
          RowBox[{"c_.", "*", "x_"}], "]"}]}]}], ")"}], "^", "n_."}]}], ",", 
    "x_Symbol"}], "]"}], " ", ":=", "\n", "  ", 
  RowBox[{
   RowBox[{"Unintegrable", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"(", 
        RowBox[{"d", "*", "x"}], ")"}], "^", "m"}], "*", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"a", "+", 
         RowBox[{"b", "*", 
          RowBox[{"ArcSinh", "[", 
           RowBox[{"c", "*", "x"}], "]"}]}]}], ")"}], "^", "n"}]}], ",", 
     "x"}], "]"}], " ", "/;", "\n", 
   RowBox[{"FreeQ", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "m", ",", "n"}], "}"}], 
     ",", "x"}], "]"}]}]}]], "Code",
 CellChangeTimes->{{3.494097279728842*^9, 3.494097309778884*^9}, {
   3.494099665582182*^9, 3.4940996672021847`*^9}, {3.4940997193022575`*^9, 
   3.494099719662258*^9}, 3.4941724567488375`*^9, 3.494172717389202*^9, {
   3.4941763709899254`*^9, 3.49417638178994*^9}, 3.494176933060712*^9, {
   3.4941891975165157`*^9, 3.494189292692283*^9}, 3.4941894111744914`*^9, {
   3.4941961386609154`*^9, 3.494196199048621*^9}, 3.4941962310130777`*^9, {
   3.494196685551076*^9, 3.494196749355188*^9}, {3.494196855996975*^9, 
   3.494196887758631*^9}, {3.494197244138057*^9, 3.494197246946062*^9}, {
   3.494197819524268*^9, 3.4941978307718887`*^9}, {3.4941989675474854`*^9, 
   3.4941989999331427`*^9}, {3.494200557901883*^9, 3.4942005644018917`*^9}, {
   3.553560008788453*^9, 3.5535600110784564`*^9}, {3.554912771049702*^9, 
   3.554912814569763*^9}, 3.554912888029866*^9, {3.554916331074686*^9, 
   3.5549163312646866`*^9}, 3.5549164666348763`*^9, {3.5549166092250757`*^9, 
   3.5549166341951103`*^9}, 3.5549275597684135`*^9, {3.554932694456403*^9, 
   3.554932695816405*^9}, 3.554932822566582*^9, {3.554933326157287*^9, 
   3.554933340167307*^9}, {3.5551139782573233`*^9, 3.5551140070773635`*^9}, {
   3.555123113366914*^9, 3.5551231221769257`*^9}, {3.5551979343091516`*^9, 
   3.555197978159213*^9}, {3.555198468169899*^9, 3.5551985303699865`*^9}, {
   3.5551996113914995`*^9, 3.555199628841524*^9}, {3.586211250898223*^9, 
   3.586211257068231*^9}, 3.586211785528979*^9, 3.586212235814633*^9, {
   3.5863105676996746`*^9, 3.5863105676996746`*^9}, 3.5863110920370336`*^9, 
   3.5863112625872726`*^9, {3.5863113146573453`*^9, 3.58631136768742*^9}, {
   3.586311499347604*^9, 3.5863114997476044`*^9}, {3.586363855938119*^9, 
   3.586363915868205*^9}, 3.58636394739825*^9, {3.5863640013633275`*^9, 
   3.5863640272983646`*^9}, 3.5863653871851177`*^9, {3.586370262796133*^9, 
   3.586370296091181*^9}, {3.5863704086963425`*^9, 3.586370463931422*^9}, {
   3.5864022297347317`*^9, 3.586402244851158*^9}, {3.6202724937210183`*^9, 
   3.6202725356534166`*^9}, {3.620278989911579*^9, 3.620279026700683*^9}, 
   3.6203513577518816`*^9, 3.6203521534033904`*^9, 3.6204124346269827`*^9, 
   3.620425102180526*^9, 3.620425227636701*^9, 3.6204256569622574`*^9, {
   3.620426325524497*^9, 3.6204263702740564`*^9}, {3.620436215459169*^9, 
   3.6204362162112117`*^9}, {3.6712161322049074`*^9, 
   3.6712161665618725`*^9}, {3.6713793007161083`*^9, 3.6713793007161083`*^9}, 
   3.7123385694180913`*^9, 3.715550340851859*^9},
 Background->GrayLevel[0.85]],

Cell["", "Subsubsection",
 CellDingbat->None,
 CellChangeTimes->{3.4796643211106243`*^9, 3.4941724567488375`*^9}]
}, Closed]]
},
AutoGeneratedPackage->Automatic,
CellGrouping->Manual,
WindowSize->{1908, 946},
WindowMargins->{{0, Automatic}, {Automatic, 0}},
PrintingCopies->1,
PrintingStartingPageNumber->1,
PrintingPageRange->{1, 32000},
PageHeaders->{{
   Cell[
    TextData[{
      StyleBox[
       CounterBox["Page"], "PageNumber"], " ", "|", " ", 
      StyleBox[
       ValueBox["FileName"], "Header"]}], "Header", 
    CellMargins -> {{0, Inherited}, {Inherited, Inherited}}], None, None}, {
   Cell[
    TextData[{
     "Rules", " ", "for", " ", "integrands", " ", "of", " ", "the", " ", 
      "form", " ", "(", "d", " ", "x", ")", "^", "m", " ", "(", "a", "+", "b",
       " ", "arcsinh", "(", "c", " ", "x", ")", ")", "^", "n"}], "Header", 
    CellMargins -> {{0, Inherited}, {Inherited, Inherited}}], None, 
   Cell[
    TextData[
     CounterBox["Page", CounterFunction :> Identity]], "Header", 
    CellMargins -> {{Inherited, 0}, {Inherited, Inherited}}]}},
PageFooters->{{None, None, None}, {None, None, None}},
PageHeaderLines->{False, False},
PageFooterLines->{False, False},
PrintingOptions->{"FacingPages"->False,
"FirstPageFace"->Right,
"FirstPageFooter"->False,
"FirstPageHeader"->False,
"Magnification"->1.,
"PaperOrientation"->"Landscape",
"PaperSize"->{783., 601.8},
"PrintCellBrackets"->False,
"PrintMultipleHorizontalPages"->False,
"PrintRegistrationMarks"->False,
"PrintingMargins"->28.8},
Magnification->1.399999976158142,
FrontEndVersion->"8.0 for Microsoft Windows (64-bit) (October 6, 2011)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[545, 20, 5951, 95, 42, "Subsubtitle"],
Cell[CellGroupData[{
Cell[6521, 119, 4035, 71, 53, "Subsubtitle"],
Cell[CellGroupData[{
Cell[10581, 194, 6991, 109, 85, "Subsubtitle"],
Cell[17575, 305, 130, 1, 48, "Subsubsection"],
Cell[17708, 308, 3518, 63, 54, "Subsubsection"],
Cell[21229, 373, 5254, 83, 54, "Subsubsection"],
Cell[26486, 458, 2006, 31, 36, "Subsubsection"],
Cell[28495, 491, 3345, 63, 85, "Subsubtitle"],
Cell[31843, 556, 795, 11, 48, "Subsubsection"],
Cell[32641, 569, 3662, 73, 145, "Code"],
Cell[36306, 644, 113, 2, 48, "Subsubsection"]
}, Closed]],
Cell[CellGroupData[{
Cell[36456, 651, 7199, 115, 74, "Subsubtitle"],
Cell[43658, 768, 250, 4, 253, "Subsubsection"],
Cell[43911, 774, 3376, 62, 379, "Subsubsection"],
Cell[47290, 838, 2049, 34, 187, "Subsubsection"],
Cell[49342, 874, 3578, 85, 590, "Subsubtitle"],
Cell[52923, 961, 795, 11, 253, "Subsubsection"],
Cell[53721, 974, 4366, 103, 961, "Code"],
Cell[58090, 1079, 113, 2, 253, "Subsubsection"]
}, Closed]]
}, Closed]],
Cell[CellGroupData[{
Cell[58252, 1087, 4848, 80, 53, "Subsubtitle"],
Cell[CellGroupData[{
Cell[63125, 1171, 7211, 113, 53, "Subsubtitle"],
Cell[70339, 1286, 250, 4, 181, "Subsubsection"],
Cell[70592, 1292, 3376, 62, 271, "Subsubsection"],
Cell[73971, 1356, 2049, 34, 134, "Subsubsection"],
Cell[76023, 1392, 3357, 76, 422, "Subsubtitle"],
Cell[79383, 1470, 795, 11, 181, "Subsubsection"],
Cell[80181, 1483, 4128, 93, 687, "Code"],
Cell[84312, 1578, 113, 2, 181, "Subsubsection"]
}, Closed]],
Cell[CellGroupData[{
Cell[84462, 1585, 5070, 84, 53, "Subsubtitle"],
Cell[CellGroupData[{
Cell[89557, 1673, 6644, 106, 53, "Subsubtitle"],
Cell[96204, 1781, 388, 7, 35, "Subsubsection"],
Cell[96595, 1790, 1292, 37, 52, "Subsubsection"],
Cell[97890, 1829, 1396, 39, 58, "Subsubsection"],
Cell[99289, 1870, 3783, 74, 57, "Subsubsection"],
Cell[103075, 1946, 5627, 118, 57, "Subsubsection"],
Cell[108705, 2066, 1758, 25, 25, "Subsubsection"],
Cell[110466, 2093, 1857, 32, 26, "Subsubsection"],
Cell[112326, 2127, 7391, 175, 331, "Subsubtitle"],
Cell[119720, 2304, 795, 11, 35, "Subsubsection"],
Cell[120518, 2317, 5419, 126, 154, "Code"],
Cell[125940, 2445, 113, 2, 35, "Subsubsection"]
}, Closed]],
Cell[CellGroupData[{
Cell[126090, 2452, 7050, 111, 53, "Subsubtitle"],
Cell[133143, 2565, 324, 5, 35, "Subsubsection"],
Cell[133470, 2572, 1286, 37, 52, "Subsubsection"],
Cell[134759, 2611, 1647, 47, 58, "Subsubsection"],
Cell[136409, 2660, 1850, 32, 26, "Subsubsection"],
Cell[138262, 2694, 5664, 129, 227, "Subsubtitle"],
Cell[143929, 2825, 795, 11, 35, "Subsubsection"],
Cell[144727, 2838, 5976, 141, 154, "Code"],
Cell[150706, 2981, 113, 2, 35, "Subsubsection"]
}, Closed]]
}, Closed]],
Cell[CellGroupData[{
Cell[150868, 2989, 6956, 108, 53, "Subsubtitle"],
Cell[157827, 3099, 130, 1, 48, "Subsubsection"],
Cell[157960, 3102, 2634, 58, 68, "Subsubsection"],
Cell[160597, 3162, 5865, 99, 54, "Subsubsection"],
Cell[166465, 3263, 1764, 29, 36, "Subsubsection"],
Cell[168232, 3294, 3537, 71, 85, "Subsubtitle"],
Cell[171772, 3367, 795, 11, 48, "Subsubsection"],
Cell[172570, 3380, 4080, 85, 145, "Code"],
Cell[176653, 3467, 113, 2, 48, "Subsubsection"]
}, Closed]]
}, Closed]],
Cell[CellGroupData[{
Cell[176815, 3475, 7343, 110, 53, "Subsubtitle"],
Cell[184161, 3587, 1873, 26, 253, "Subsubsection"],
Cell[186037, 3615, 2993, 57, 393, "Subsubtitle"],
Cell[189033, 3674, 795, 11, 253, "Subsubsection"],
Cell[189831, 3687, 3524, 68, 771, "Code"],
Cell[193358, 3757, 113, 2, 253, "Subsubsection"]
}, Closed]]
}
]
*)

(* End of internal cache information *)